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EDITORIAL 



UN POCO DE SERIEDAD POR PAVOR 



Haciendo gala de la ética profesional que 
debe observar cualquier publicación que se 
precie, siempre que en nuestros editoriales 
nos hemos visto obligados a mencionar al- 
guna revista de la competencia nos hemos 
negado a dar el nombre de la misma. Sin 
embargo, cuando los medios informativos 
caen en la más directa tomadura de pelo a 
los usuarios y lectores, no podemos hacer 
otra cosa que denunciar con pelos y señales 
a quien se atreve de forma solapada, a la par 
que con todo el descaro del mundo, a sem- 
brar la confusión entre los lectores. Dicho 
esto, y teniendo en cuenta que la noticia ha 
causado inquietud entre los usuarios del 
MSX, vamos de una vez por todas a aclarar 
la cuestión. En la revista EL ORDENADOR 
POPULAR del mes de febrero apareció un 
artículo titulado MSX estándar para la 
educación que no tiene desperdicio. En él 
se vierten de forma arbitraria toda una se- 
rie de informaciones —mejor dicho desin- 
formaciones—, que no acertamos a enten- 
der de donde han salido. Pero si estas afir- 
maciones ya son de por sí alucinantes, no 
menos alucinantes son las conclusiones a 
las que llega el articulista. No vamos a en- 
trar aquí en detalles, porque este no es el 
objeto de este editorial, y porque desde 
nuestra sección Input Output ya contesta- 
mos a toda esa serie de infundios. Lo que 
desde esta tribuna abierta nos preocupa 
realmente es la tomadura de pelo a la que 
aludimos porque quienes editan EL ORDE- 
NADOR POPULAR pertenecen al mismo 
grupo editorial -y ahora lo vamos a decir 
con todas las letras— de quienes publican la 
revista MSX MAGAZINE, de modo que o les 
están tomando el pelo a los lectores desde 
EL ORDENADOR POPULAR o lo que es peor 
están editando una revista de MSX sin nin- 
gún convencimiento. Todo esto viene a con- 
firmar algo que ya hemos advertido en va- 
rias ocasiones, la escasa Habilidad de quie- 
nes con tal de hacer su agosto publican indis- 
tintamente revistas para cualquier es tan- 
dar del mercado. Juzguen ustedes mismos. 

MANHATTAJT TBAKTSFER 
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HABDCOFT 

Además de felicitarles por 
su revista quiero preguntarles 
cómo imprimir gráficos con 
ella, 3ra que sólo consigo sacar 
listados con la orden LLI8T. 

Pedro Quzmán 



Te recomendamos la lectura 
de «Volcado de pantalla» publi- 
cado en nuestro número ante- 
rior. 
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PRECIO DE LA BEE 
CARD 

Ruego me confirmen el pre- 
cio de la BEE CARD ya que en el 
mes de octubre daban uno de 
2.300 pts. y en una tienda de 
ordenadores me piden 8.900 
pts. 

Javier Jiménez Vázquez 
Bilbao 

El precio que dimos en aque- 
lla ocasión fue suministrado 
erróneamente por su Importa- 
dor. Posteriormente hemos 
dado a conocer el precio apro- 
ximado de venta al público, 
que es de 8.600 pts. 



MSX YSFEGTRUM 

¡Hola! Vuestra revista es 
alucinante y por eso quiero 
que me saquen una duda. Quie- 
ro comprarme un ordenador y 
un niño de mi clase dice que 
me compre un Spectrum de 
48K, pero hay otro que se lla- 
ma J. Romero quiere que me 
compre un HIT BIT de 64K 
MSX. 

David LlopVlrglll 
Rana 

Cualquier ordenador de la 
norma MSX tiene un gran fu- 
turo tanto en el hogar como en 
la escuela. 

Soy suscrlptor de vuestra re- 
vista y creo que hacerlo tiene 
muchas ventajas; se lo reco- 
miendo a todos los lectores. 

Me he enterado que el Spec- 
trum de 48K, con menor me- 
moria que la mayoría de los 
M8X, posee un área Ubre de 



unos 40K, mientras que los 
MSX, una de 30K aproximada- 
mente. Me gustaría saber por- 
qué tienen los 8pectrum más 
memoria disponible que los 
MSX. 

Alejandro López Ramón 
Madrid 

Los ordenadores de la norma 
MSX de 64K RAM, por ejemplo, 
disponen de esa memoria del si- 
guiente modo; 29K libres para 
el usuario, 36Kpara el sistema 
operativo de disco. A esta me- 
moria hay que sumarle 16K 
mas de vídeo RAM, para la reso- 
lución gráfica con lo que en rea- 
lidad son aparatos de 80K de 
RAM El Spectrum tiene 46K de 
RAM pero de ellos debe dar 40 
para el usuario, ya que éste ne- 
cesita mas memoria debido a la 
menor potencia del lenguaje 
que emplea. Como ves, las apa- 
riencias pueden engañar. 



GRABACION 

Hace poco me he comprado 
un 8pectravídeo 728 pero no 
sé cómo grabar. ¿Es que nece- 
sito comprar un copie? 

Jorge de Castro 
Valladolld 




No necesitas comprar nada 
especial como no sea una gra- 
badora si es que no la tienes. 
Con ella en tu poder y hechas 
las conexiones pertinentes 
sólo tienes que seguir las ins- 
trucciones que te indica el ma- 
nual. También puedes leer 
nuestro artículo "Cómo gra- 
bar un cassette» aparecido en 
el número 3. 

He comprado una unidad de 
disco Sony a fin de almacenar 
programas en Código Máqui- 
na, pero resulta que sólo me 
entran 22 y después me sale 
Illegal Funotion. Sigo las Ins- 
trucciones Bsave «nombre del 
programa», doy las direccio- 
nes inicial y flná.1 y ejecuto, sin 
resultado positivo. 

Joan González Castilla 
Le joña (Vizcaya) 

Las Instrucciones de graba- 
ción son correctas por lo que 
ignoramos si no existe otro 
motivo que impida la graba- 
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clón de sus programas. Sí bien 
dice 22, por ejemplo, no sabe- 
mos la longitud de los mismos. 
También puede suceder que su 
Unidad de Disco tenga algún 
problema interno, por lo que le 
recomendamos que consulte 
al Servicio Oficiad de Sony. 



MEZCLAR TROZOS 

¿Qué debo hacer para grabar 
los programas por trozos? 
Siempre que lo intento en un 
listado largo me quedan dos 
programas separados que no 
me son de ninguna utilidad. 

Juan Feo. López Pérez 
(CUENCA) 

Si utilizas CSAVE Y CLOAD, 
evidentemente tendrás este 
problema. Para unir dos tro- 
zos de un programa, de Des gra- 
bar los «trozos» con SAVE 
(formato ASCII) y para unir- 
los, debes emplear la orden 
MERQE: 

MEROE "CAS: " 

Ah, ten cuidado con la nume- 
ración de las líneas, porque si 
coincide alguno de los que en- 
tres con uno que ya tengas, 
sólo te quedará el último. 



FRACTALES 

Os escribo la presente para 
hacer algunas puntualizacio- 
nes al artículo que apareció en 
el n.° de febrero sobre los con- 
juntos frac tales. 

-La geometría fractal no es 
la «Geometría de lo Imposi- 
ble», pues una recta es un con- 
junto fractal: la menor partici- 
pación que hagamos seguirá 
siendo una recta, por lo tanto 
tiene la propiedad de la autosi- 
milaridad. 

—En vuestro artículo se afir- 
ma que el universo tiene más 
de tres dimensiones espacia- 
les. Bien, hay infinitas, pero 
nunca podrá ser menor que 0 o 
mayor que 3. 

-El último párrafo de la «di- 
mensión de lo fractal» está ín- 
tegramente copiado del artícu- 
lo aparecido en la revista «EL 
ORDENADOR POPULAR» de 
11/84. 

-La curva dragón no es un 
fractal pues se pueden hacer 
partioiones que contengan un 
trozo de curva y éstas no son 
curvas dragón. 

Samuel Tamar agüe 
HUMttP 

Vamos por partes: En nin- 
gún lugar del artículo citado se 
afirma que una recta no sea un 
conjunto fractal, simplemente 
se han utilizado otros ejem- 
plos para ilustrarlo, tal vez 
más claros que la recta. En 
cuanto al título «La geometría 
del imposible», no nos parece 
tan desacertado puesto que no 



hemos conseguido ver nunca 
una recta suelta por ahí. 

En ningún párrafo del artí- 
culo se afirma que haya más 
dimensiones de las compren- 
didas entre Oy 3 aunque este- 
mos seguros de ello. Lamenta- 
mos informarte de que el pá- 
rrafo al que te reñeres de la di- 
mensión de lo fractal no está 
íntegramente copiado del n.° 
al que te reñeres del ORDENA- 
DOR POPULAR ni de otra re- 
vista, simplemente está docu- 
mentado en el n.° 4 Vol. 3 de 
«Computer Carnes». 

Efectivamente, la curva dra- 
gón cuyo listado pubhcamos, 
no es una fractal estrictamen- 
te, pero como advertimos en el 
propio artículo «... está pensa- 
do para que te hagas una idea 
del principio de autosimilari- 
dad». 



Agradecemos tu interés por 
elariñear los puntos oscuros 
que has observado en nuestro 
artículo, y estamos seguros 
que todos nuestros lectores 
también te lo agradecerán. 



PRECIO MAS IVA 

Les escribo para preguntar- 
les por qué subió 25 pts. la re- 
vista MSX CLUB y sólo 10 pts. 
ésta. Además otra razón es fe- 
licitarlos tanto por los progra- 
mas como por los artículos. 
Ja cobo Gómez Tomillo 
Valladolid 

Las diez pesetas del mes de 
enero, tal como expheamos se 
debió a un error de cálculo, por 
lo que ya habrás comprobado 
que lo hemos corregido y am- 
bas revistas cuestan ahora 



ATAQUES INFUNDADOS 
CONTRA EL MSX 



En un artículo publicado en 
«Ordenador popular» de febre- 
ro referido a MSX se puede leer 
entre otras cuestiones lo si- 
guiente: «Tras su fría acogida 
en el mercado doméstico, los 
fabricantes de equipos MSX 
buscan refugio en el incipien- 
te, pero importante mercado 
educativo»; «Fracasó el soft- 
ware, ni han sido tantos ni tan 
buenos los programas para 
este tipo de máquinas»; «La 
compatibilidad no fue tan ab- 
soluta»; «Los colegios que es- 
tén dotados de equipos MSX 
quedarán aislados...»; «Pese a 
las promesas son varias las 
compañías que están evolucio- 
nando —y rápidamente— hacia 
la ruptura del estándar MSX». 
Hay otras frases igualmente 
preocupantes si son ciertas 
pues los usuarios quedaremos 
«colgados» con nuestros equi- 
pos. Quiero que me aclaren si 
son fundadas estas afirmacio- 
nes o es fobia o envidia de esta 
publicación hacia nuestro es- 
tándar. Ustedes tienen la res- 
puesta. 

Francisco Bsquivel 
Córdoba 

Ninguna de las afirmacio- 
nes hechas en el artículo que 
menciona tienen el más míni- 
mo fundamento. Sólo quien ig- 
nora el alcance de la operación 
comercial y tecnológica, apo- 
yada por casi veinte grandes 
compañías de prestigio mun- 
dial y no por una sola marca, 
puede sostener tales frivolida- 
des. Pero vayamos por partes. 

-Es palpable el éxito rotun- 
do del estándar en el mercado 
español dentro del sector do- 



méstico, alcanzando en el pla- 
zo de un año casi el 40% del to- 
tal de ventas, antes monopoh- 
zadas por otras marcas con 
varios años de presencia. Al 
mismo tiempo, la potencia de 
su lenguaje, la versatilidad de 
las máquinas ofrecidas y la po- 
sibilidad de un Ai turo sin aisla- 
mientos por obsolescencia, 
hacen del estándar el más idó- 
neo para aplicaciones educati- 
vas, de gestión doméstica o de 
pequeños negocios. 

-El software no ha fracasa- 
do. Simplemente que los fabri- 
cantes de software no han 
reaccionado con la misma ra- 
pidez que lo ha hecho el públi- 
co y por tanto no hay suficien- 
te. No obstante, según una re- 
ciente estadística publicada 
por el Centro Divulgador de la 
Informática, dependiente de la 
Oeneralitat de Catalunya, MSX 
cuenta con el doble de progra- 
mas educativos que cualquiera 
délas otras marcas o sistemas. 

Los colegios y los usuarios 
particulares de MSX están en 
mejores condiciones que cua- 
lesquiera otros para irse adap- 
tando a los avances tecnológi- 
cos. En primer lugar porque la 
compatibilidad es absoluta en- 
tre los aparatos MSX debido a 
que todo fabricante con licen- 
cia de Microsoft debe cumplir 
estrictamente con las normas 
de compatibilidad. En segundo 
término, los aparatos MSX a 
través de su sistema operativo 
MSX-DOS son compatibles con 
los dos sistemas operativos 
para discos más populares en 
ordenadores profesionales de 
1 6 bits, MS-DOS y CPfM. 



1 75 pts, incluido IVA En prin- 
cipio hicimos el cálculo sobre 
el precio anterior, pero no tu- 
vimos en cuenta los costos in- 
cidentales —imprenta, papel, 
fotocomposiclón, etc.— modiñ- 
cados por el mismo impuesto. 
GRACIAS POR LAS FELICITA- 
CIONES. 



CONEXION CON EL 
VIDEO 

Tengo un Canon V-20 y me 
gustaría saber cómo se puede 
conectar el ordenador al apa- 
rato de vídeo. He intentado ha- 
cerlo a través de la salida RF 
del ordenador con la entrada 
de antena del vídeo pero no 
sintonizo nada. 

Miguel Borrego 
Olot (Giro na) 

Para realizar este tipo de co- 
nexiones necesitas que tu or- 
denador cuente con una salida 
RQB (Red, Oreen, Blue). Por 
ahora los únicos aparatos que 
cuentan con esta salida son el 
HIT BIT 75 y el JVC HC-7E. 



FUNCION PLAY 

Tengo un Toshiba HX-10 y 
me encuentro con un proble- 
ma con la instrucción PLAY, 
pues casi todas las líneas que 
la llevan me salen con Hlegal 
Punction Cali al ejecutarlas. 
Reviso las líneas y están bien. 
También quiero saber si el so- 
nido sale por el altavoz del te- 
levisor o tengo que conectar 
un equipo de audio. 

Tomás Pérez 
Madrid 
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Los problemas que tienes 
con la orden PLAY pueden de- 
berse a que confundes «unos» 
por «eles» o viceversa, por lo 
que te recomendamos que te fi- 
jes bien en esos detalles. Tam- 
bién otra confusión frecuente 
es la de los «ceros» y las «oes». 
El sonido «viaja» junto con la 
señal de imagen a través de la 
salida RF y llega vía antena a 
tu televisor. 
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CARGA DE PROGRAMAS 

¿Un programa que carga 
con load puede cargar con 
cload? 

¿Cómo se puede hacer para 
que en modo gráfico no haya 
que poner un GOTO al final 
para que no cambie a modo de 
texto? 

Javier Ib arel 
Guadal ajar a 

En ningún caso un progra- 
ma grabado con SAVE puede 



ser cargado con la orden 
CLOAD, y no ae puede utilizar 
máa que el comando corres- 
pondiente para cargar un pro- 
grama Eato sucede porque 
cada vez que utilizas una or- 
den de grabación o carga el or- 
denador transite (en el caso de 
la grabación) en un formato 
determinado los datos, y en el 
caso de la carga espera recibir 
los datos en el formato que se 
le indica en la orden en cues- 
tión. Los MSX pueden trabajar 



con 3 formatoa dlferentea: 
Formato interno ( Caave para 

grabar y Cload para cargar) 
Formato ASCII (Save para 

grabar y Load para cargar ) 
Formato Binario (Baave para 

grabar y Bload para cargar) 
Si no deseas crear un «bucle 
infinito» (poner un COTO al fi- 
nal) puede uaar cualquiera de 
Jas siguientes opciones: 

i ooo z"$"=niipnT$(Y) 

2) 

1000 IF INKEYt =" ■ THEN 
1000 

íooo 3TS33"W*'Sfir 

1000 

La primera y aegunda opcio- 
nea que te preaentamoa aon 
prácticamente la misma: en el 
momento en que pulses cual- 
quier tecla, ae interrumpirá el 
programa y volverá a modo de 
texto. Con el tercer ejemplo no 
ae detendrá el programa a no 
aer que ae pulse la tecla especi- 
ñcada ( en el caso que mostra- 
mos, la A). 



ARCHIVO 

DISCOGRAFICO 

Me gusta teclear los progra- 
mas que remitís en cada revis- 
ta y hasta ahora me funcionan 
bien, pero al teclear Archivo 
discográfico me sale «out of 
memory in 470». No compren- 
do porqué, ya que no aclaráis 
que sea para ordenadores de 
más de 32K. Les aclaro que yo 
tengo un Hit Bit 86P. 

Jorge Sanmartín Moreno 
Quart de Poblet C Valencia ) 

-Aunque no lo aclaramos este 
programa es para 32K. De to- 
dos modoa para que Archivo 
Dlacográñco te funcione en tu 
ordenador puedes colocar mo- 
dificar la línea 250 DIM NG$ 
(100), NA$ (100, 20), 
TA(100). 



PROBLEMAS DE 

IMAGEN 

Después de leer vuestra opi- 
nión acerca del X'Press no lo 
dudé y cambien el MSX que te- 
nía por este modelo. Pero re- 
sulta que ahora tengo un pro- 
blema y es que el Manual que 
me dieron viene en inglés. Por 
lo que les sugiero que me indi- 
quen uno que venga en caste- 
llano. Por otro lado tampoco la 
imagen me sale nítida en el te- 
levisor, como me salla con el 
Sony que tenía antes ¿puede 
ser problema del ordenador? 

Francisco D. Osuna 
El Arenal (Baleares) 

La casa Indeacomp, SA., dis- 
tribuidora ofíclal del Spectra- 
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vídeo nos ha comunicado que 
los aparatos comercializados 
por ella tienen los manuales 
en castellano. En consecuen- 
cia te recomendamos que te di- 
rijas a la tienda donde lo com- 
praste y lo reclames. Las difi- 
cultades de imagen puedes so- 
lucionarlas ajustando el tele- 
visor. 

Tengo un Toshiba HX-10 y 
cuando intento que salga una 
circunferencia en pantalla o 
un rectángulo me salen defor- 
mados. ¿Puede ser un proble- 
ma del televisor? También les 
comento que cada vez que co- 
pio un programa de revista, li- 
bro, etc. me sale con errores y 
no los encuentro por más que 
repase el listado. 

María del Mar Rubio 
Madrid 

Como le decimos a Francisco 
te recomendamos que ajustes 
la imagen del televisor. Una 
vez que te hayas familiarizado 
con la máquina y su lenguaje 
los errores de copias diaminui- 
rán. No te desalientea. 



ME JORA A QUINIELAS 

Un amigo y yo hemos hecho 
unas modificaciones al pro- 
grama «Quinielas» aparecido 
en el número de enero. 

En primer lugar en las lí- 
neas 470, 480 y 490 donde 
pone PRINT";" cambiar por 
PRINT7", que es la misma te- 
cla más SHIFT y GRAPH. 

La línea 50 CLS: KEY OFP: 
COLOR 1, 7 

La línea 560 PRINT" ¿Quie- 
res repetir (S/N)?" A$ 

Por ultimo añadir: 

570 A$ = INKEY$ 
580 INPUT A$ 

590 IF A# O "S" AND A$ <> 
«N» THEN 580 
600 IF A$ = "S" THEN 620 
610 IF A$ = "N" THEN 630 
620 OLEAR: CLS: COLOR 6, 10: 
GOTO 60 

630 CLS: COLOR 15,4: KEY ON: 
END 

El programita lo que hace es 
suprimir teclas de función, 
cambiar el color de la pantalla, 
la presentación del recuadro 
de los resultados y una vez da- 
dos éstos, te pregunta si quie- 
res repetir o no. Si la respuesta 
es afirmativa cambiar el color 
de la presentación y vuelve a 
preguntar las apuestas. Si res- 
pondes que no regresa al color 
original terminándose el pro- 
grama y volviendo al modo di- 
recto. 

Carloa González García 
Barcelona 

^Gracias por tu colabora- 



CRITICAS 
Y SUGERENCIAS 

Soy lector de vuestras dos mas repetición de programas 
revistas pero me siento de- en realidad es repetición tema- 
fraudado en cuatro puntos: tica, ya que los programas no 

1- Repeticion de programas son los mismos. 

en las revistas. Los lectores de 2-Evidentemente no pode- 

sus dos revistas no tienen por mos dejar de publicar progra- 

que aguantar la repetición de mas sencillos y cortos, pero en 

programas como archivos, cada numero tratamos de 

biorritmos, etc. equilibrar unos y otros. Ten en 

2- Programas sencillos y cuenta que nuestra misión es 
cortos. Me refiero a progra- satisfacer a muchos miles de 
mas como Calendario, Solfeo, lectores muy atentos. 
discos Tron, Severiano, etc. 3-« Aquí están ¡os 20 MSX de 
que están faltos de tema y grá- España» es la primera guía de- 
ficos. Aunque me gustan mas tallada de los aparatos exis- 
programas como La Caza, que tentes en nuestro país en di- 
vale la pena teclearlos. ¿Es que ciembre. Muchos de ellos /líe- 
los que llevamos un año con ron presentados por primera 
vosotros tenemos que seguir vez en septiembre durante el 
soportando a los que empie- SONIMAG. 

zan? 4— La seriedad con que plan- 

3- La publicación de «Aquí teamos nuestro trabajo es la 
están los 20 MSX de España» base dei prestigio que hemos 
ha sido una pasada para relie- ganado entre nuestros lecto- 
nar, puesto que no habéis pre- res. 

sentado ni uno nuevo. Como ves, entendemos tu 

4- Cassettes. Me parece muy postura y esperamos que 
bien y creo que ha sido un cri- nuestras respuestas sean sa- 
terio muy acertado el haber tisfactorias. 

preparado bien las cassetes, 
para sacarlas con máximas 

garantías, no como otras edi- Vuestras dos revistas son 

toriales a las que podría califi- estupendas y espero que sigas 

car de estafadoras, pero no me asi y no lleguéis a caer en el 

parece bien que tengamos que oportunismo que he podido 

pagarlas por anticipado con comprobar en otras. Me gusta- 

talon bancario. ¿Por que ade- ría haceros una pequeña suge- 

lantar dinero antes de recibir renciay es que publicarais los 

nada? programas a modo de separata 

Salvo estas precisiones debo a fin de que podamos hacer con 

deciros que no tenéis compe- ellos una colección. También 

tencia en cuanto a la calidad de quiero que me informéis donde 

vuestros artículos. Espero en- puedo pedir por correo la Bee 

tendáis mi postura. Card y su conector. 

Juan Carlos Prieto Genaro López 

Valladolid Aa Pontes (La Corana) 

I-Si bien muchos de núes- Tu sugerencia viene a apo- 
tros lectores son los mismos y ar una idea que estamos estu- 
que los de nuestra hermana diando y que tal vez muy pron- 
MSX CLUB, muchos otros no lo to podamos llevarla a cabo. La 
son. De todos modos ningún Bee Card puedes solicitarla a 
programa ha sido repetido en Sony España, SA., Sabino de 
ningún número de ninguna de Arana, 42-44, 08028 Barcelo- 
las dos revistas. Lo que tú lia- na. 
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SUSCRIBETE HOY MISMO SI 
QUIERES ESIAB EN VMGUASIIA 




La primera revista de MSX de España en ta domicilip cada 
mes. Por el precio de DIEZ NUMEROS recibirás DOCE. 

Además tu condición de suscriptor te da derecho 
a descuentos y ofertas especiales en otos productos. 



Nombre y apellidos 



Calle 



Ciudad 

Provincia 



Tel. 



Deseo suscribirme a la revista 
SUPERJUEGOS EXTRA MSX 

a partir del número 

FORMA DE PAGO: Mediante talón nan- 
earlo a nombre de: 



C/. Roca 1 Batlle, 10-18 
08083 Barcelona 



Muy Importante: para evitar retraaos en la 
recepción de loa números rogamos deta- 
lléis exactamente el nuevo número de los 
distritos postales. Gracias. 



Ptas. 1.780 - 
Ptas. 2.000 - 
Ptaa. 8.800- 
Ptas. 38 USA $ 



España por correo normal 
Europa correo normal 
Europa por avión 
América por avión 



NUMEROS ATRASADOS • NUMEROS ATRASADOS 




MSX11 150 PTAS. 



MSX12-13 300PTAS. 



MSX 14 160 PTAS. 



MSX15 175 PTAS. 



MSX16 175 PTAS 



¡LA 1. a REVISTA DE MSX DE ESPAÑA! 

PARA QUE NO TE QUEDES CON LA COLECCION INCOMPLETA SOLO TIENES QUE ENVIAR HOY 
MISMO EL BOLETIN DE PEDIDO CON TUS DATOS PERSONALES A «SUPER JUEGOS EXTRA MSX» 
-DPTO. SUSCRIPCIONES C/. Roca i Batlle, 10-12, 08023 Barcelona. 



Deseo recibir los números 



de SUPERJUEGOS EXTRA MSX 



para lo cual adjunto talón del Banco 

Nombre y apellidos ...... 

Dirección 



a la orden de Manhattan Transfer, SJL 



^ Población 



DP Prov. 



<No se admite contrarreembolso» 
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EL COMPACTO DE SONY 



Ha aparecido recientemente en el mercado un nuevo aparato de SOITY, que manteniéndose en su habitual línea de calidad incorpora una serie 
de novedades de gran interés para los fatuos usuarios que se decidan por este modelo, 



El HIT BIT 501 -P presenta el mis- 
mo diseño de sus predecesores 
(HB101 y HB 201); la caja es de 
color negro, las teclas especiales y de 
función son grises y las alfanuméricas 
blancas. Este ordenador presenta la 
máxima memoria disponible para usua- 
rio, es decir 64K RAM + 16 VRAM. 
Como los otros modelos, también lleva 
incorporadas dos ranuras para cartucho 
en su parte superior y dos tomas para 
joystick en su parte lateral derecha. 

Lleva además la tecla RESET; tan 
práctica para no tener que desconectar 
el ordenador en caso de que se cuelgue 
un programa o se desee reinicializar un 
cartucho. 

Como sus hermanos anteriores, lleva 
además incorporada la tecla PAUSE, 
muy útil para detener la ejecución de un 
programa sin las limitaciones de la tecla 



STOP. Como ya viene siendo norma en 
los aparatos SONY, en el centro de las 
teclas del cursor puede insertarse un eje 
que simula un joystick, pudiéndose ex- 
traer y adosar a su parte posterior. 

Hasta ahora, lo que hemos dicho de 
este aparato pudiera muy bien aplicarse 
a cualquier otro ordenador SONY. Vea- 
mos pues, qué es lo que nos ha hecho 
"bautizar" al 501 P como "el compacto 
de SONY". 

LA DIFERENCIA 

Dos son, en realidad, las diferencias 
de este aparato con respecto a los mo- 
delos anteriores. Por un lado, cuando se 
conecta la máquina no aparece el habi- 
tual programa "PERSONAL DATA 
BANK" que viene incorporado en todos 
los aparatos de este fabricante, sino que 



se accede directamente al BASIC. No 
obstante, no deben inquietarse los 
usuarios, puesto que junto con el apara- 
to viene suministrado una versión en 
cassete de dicho programa. 

La segunda diferencia, que es la más 
visible aunque la hayamos dejado para 
el final, hace que el 501 de SONY sea 
uno de los aparatos más prácticos del 
mercado, pues este ordenador lleva in- 
corporada una lectograbadora de cas- 
sette. 

En su parte superior, a la izquierda de 
las ranuras de cartucho, este ordenador 
lleva un pequeño cassette (formato 
walkman) que ofrece las siguientes ven- 
tajas con respecto a los cassettes habi- 
tuales: 

- Recibe la alimentación directamente 
del ordenador, con lo que por un lado 
se resuelven los problemas de los 




SONY 
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aparatos que funcionan a pilas, y por 
otro se evitan enchufes y conexiones 
con todos los pequeños engorros que 
conllevan. 

Lleva un interruptor de monitor con 
tres posiciones, off, low y high, permi- 
tiéndonos respectivamente eliminar 
el monitor; oír la carga o grabación de 
los programas con un leve pitido a tra- 
vés del altavoz del monitor o bien au- 
mentar la intensidad del pitido. 
Un led colocado a la derecha del cas- 
sette nos informa acerca de la opera- 
ción en curso: Si el ordenador carga, 
el led se ilumina en verde; si graba en 
rojo. 

Además de las teclas habituales, in- 
corpora la tecla mute de gran utilidad 
puesto que sirve para dejar un espa- 
cio en blanco detrás de un programa. 
¿Para qué sirve dejar un espacio en 
blanco detrás de un programa? En el 
HB 501 sirve para que pueda activar- 
se la función ADS (Automatic Data 
Search) que nos va a permitir locali- 
zar rápidamente un programa pulsan- 
do PLAY+FFWD o bien PLAY+ 
REW siempre y cuando el espacio 
que hayamos blanqueado con MUTE 
sea como mínimo de cuatro segun- 
dos. 

Naturalmente, el cassette lleva in- 
corporado un cuentavueltas, para po- 
der controlar la ubicación de los datos 
o programas. 




FICHA TECNICA 



Microprocesador Z80A 
Frecuencia de clock 3,58MHz 



Memoria ROM 
Memoria RAM 
Modo de texto 
Modo gráfico 
Colores 
Sprites 
Sonido 
Teclado 

Conexión cartucho 



32K 

64K+ 16KVRAM 

40x24 

256x192 

16 

32 

8 octavas/ 3 tonos 

QWERTY (profesional/ 75 teclas) 

2 conectores 



Conexiones directas 2 joysticks 

impresora tipo centronic 
salida vídeo/ audio 
RF( antena TV) 
Terminal a tierra 

BASIC MSX, máquina, ensamblador, Pascal, Logo, etc 
Sony España, S A. 

Sabino de Arana 42-44. 08028 Barcelona 
65.000 pts. + 7.800 IVA 

Incorpora grabadora de datos, mando para cursor 
y selector de antena 



Lenguajes 
Distribuidor 

Precio aproximado 
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Al estar incorporado en el ordena- 
dor, el control remoto del cassette se 
efectúa de una manera más racional. 
El "remote" interno sólo se activa 
para las operaciones en que intervie- 
ne la tecla PLAY; en otras palabras, 
permite bobinar y rebobinar sin estar 
constantemente pendientes de la or- 
den MOTOR o de conectar y desco- 
nectar la clavija REMOTE. 

En su parte posterior incorpora las 
salidas de antena (RF), impresora 
(centronics), vídeo/audio y una toma 
de tierra. 

En suma, se trata de un aparato de 
interesantísimas prestaciones, buen 
diseño que satisfará a aquellos usua- 
rios que deseen llevarse un «com- 
pacto» con cassette incorporado para 
ponerse a trabajar desde el primer 
momento. Además, por 65.000 pts. + 
IVA. ¿Quién da más? 



REGALATE Y DISFRUTA DE UN" LIBRO 
VITAL PARA EL USUARIO DE MSX 



UN LIBRO PENSADO 
PARA TODOS LOS QUE 
QUIEREN INICIARSE 
DE VERDAD EN LA 
PROGRAMACION BASIC 

Construcción de programas. El po- 
tente editor todo pantalla. Constan- 
tes numéricas. Series, tablas y ca- 
denas. Grabación de programas. 
Gestión de archivo y grabación de 
datos. Tratamiento de errores. Los 
gráficos del MSX. Los sonidos del 
MSX. Las interrupciones. Introduc- 
ción al lenguaje máquina. 



I M II K (.1 I HHl HO 



JUAN t AHI OS GON/Al H. 



guui m« .rluudjd de «¡ecucua 

componei música a un*, dos o ttn w>ces 
organizar tus propios programas de gestión. .. 

LOS SECRETOS DEL 




Y ADEMAS PROGRAMAS 
DE EJEMPLO 

Alfabético. Canon a tres voces. 
Moon Germs. Bossa Nova. Blue 
Bossa. La Séptima de Beethoven. 
La Flauta Mágica de Mozart. Scra- 
ple from the apple & Donna Lee. The 
entretainer. Teclee un número. Ca- 
lendario perpetuo. Modificación 
Tabla de colores SCREEN 1 . Rec- 
tángulos en 3-D. Juego de caracte- 
res alfabéticos en todos los modos. 
Juego Matemático. Más grande más 
pequeño. Póker. Breackout. Apoca- 
lypse Now. El robot saltarín. El ar- 
chivo en casa. 



Deseo me envíen el libro Los secretos del MSX, para lo cual adjunto talón de 1.500 ptas. a la orden de 
MANHATTAN TRANSFER, S.A. importante: No se hace contra reembolsos. 

Nombre y apellidos 

Calle n.° Ciudad CP 

Este boletín me da derecho a recibir los secretos MSX en mi domicilio libre de gastos de envío o 
cualquier otro cargo. 

Importante: indicar en el sobre MANHATTAN TRANSFER, S.A. 

«LOS SECRETOS DEL MSX» 

Roca i Batlle, 10-12 Bajos-08023 BARCELONA 
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BIENVENIDOS A msxclub 

UN SOFTWARE DE ALTA CALIDAD PARA MSX 



F 





CON GARANTIA / 

/l#H^Í TAN T W JSRT ¿ S A 




KRYPTON. La batalla mas audaz de las gala- 
xias en cuatro pantallas y cuatro niveles de 
dificultad. Un juego cuya popularidad es cada 
vez mas grande entre los usuarios del MSX. 
PVP.500 Ptas. 



El secreto N ¡ EV0 ''i 



Ü-BOOT. Sensacional Juego de simulación 
submarina en la que tienes que demostrar tu 
pericia como capitán de un poderoso subma- 
rino de guerra. Panel de mandos, sonar, tor- 



QÜINIELAS. El mas completo programa de 
quinielas con estadística de la liga, de los 
aciertos, etc. e impresión de boletos. Acertar 
no siempre es cuestión de suerte. PVP. 700 



8NAKE. Entretenido y muy divertido Juego 
en el que Snake procura comer unos núme- 
ros que la engordan. Tanto las murallas que 
la rodean como su larga cola pueden ser 

mo: 





EL SECRETO DE LA PIRAMIDE. Atrevido 
juego de aventuras a través de los misterios 
y peligros que encierran los laberínticos pa- 
sillos de una pirámide egipcia. [Atrévete si 
puedes! PVP. 700 Ptas. 



Siguieres recitlr por i 

l~ Nombre y apellidos: 

Dirección: 

Población: 




CP 



Prov. 



Tel.: 



□ KRYPTON Ptas. 500,- 

□ TJ-BOOT Ptas. 700- 

□ QUINIELAS Ptas. 700- 

Gastos de envío certificado por cada cassette, 
Remito talón bancario de Ptas. 



□ SNAKE 

□ EL SECRETO DE LA PIRAMIDE 



Ptas. 600,- 
Ptas.700,- 



L 



Ptas. 70,- 

a la orden de Manhattan Transfer, S A 



ATENCION: Los suscriptores tienen un descuento del 10% sobre el precio de cada cassette. 
SJS MSX CLUB DE CASSETTES. ROCA I BATELE, 10-12 BAJOS. 08023 BARCELONA 



NUESTRAS CASSETTES NO SE VENDEN EN QUIOSCOS. LA UNICA FORMA DE ADQUIRIRLAS ES SOLICITANDOLAS 

A NUESTRA REDACCION. ¡NO SE ADMITE COMPRA REEMBOLSO! 



EL ORDENADOS MUSICAL 00 



Lamnsica computada ertáadneñkdosepocoapw 
producidapornnd88jertador,aoírenel(líadenüe8^ 

WMonete de las máqTdnas tragaperras en las cafeterías... En rama, estamos absolutamente invadidos por la mísica computeriiada. Los usuarios de MSZno 
deben pasar por alto que el equipo del que disponen tiene imas granito 



Por feo. Javier Guerrero 
ALGUHOS DATOS TECNICOS 

Los ordenadores MSX vienen equi- 
pados con un generador progra- 
ble de sonido (PGS) fabricado por 
la prestigiosa firma General Instru- 
ments; este chip permite manejar simul- 
táneamente hasta tres voces, aparte de 
llevar incorporado un generador de rui- 
do. 

EL BASIC MSX tiene 3 comandos que 
permiten la generación de sonidos por el 
ordenador. El primero de ellos es tan 
simple que tan sólo lo mencionamos a 
título anecdótico. Se trata de BEEP, tan 
tristemente conocido por los sufridos 
usuarios del sistema, puesto que les avi- 
sa continuamente de los errores que se 
van produciendo durante la ejecución 
de los programas. Además de esto tiene 
otra utilidad, reinicializa el chip de soni- 
do a sus valores por defecto. 

Otro de los comandos musicales es 
PLAY, que da acceso al macrolenguaje 
musical (similar al macrolenguaje gráfi- 
co de DRAW) y permite trabajar hasta 
en tres canales simultáneamente. Esta 
peculiaridad de poder trabajar en tres 
canales, unida a la facilidad de manejo 
del macrolenguaje, permite -como ve- 
remos más adelante- adaptar cualquier 
partitura de agrado del usuario (siempre 
que tenga 3 voces como máximo), o 
bien efectuar sus propias composicio- 
nes o arreglos. ¡La polifonía al alcance 
de cualquiera...! 

SOUND es el tercer comando genera- 
dor de sonidos. Permite el acceso direc- 
to a todos los registros del PSG para la 
realización de interesantes efectos so- 
noros. Puede acceder a los tres canales 
de sonido en sus ajustes fino y aproxi- 
mado al generador de ruido; asimismo 
permite seleccionar el tono y el volumen 
de los tres canales, el envolvente y el 
patrón de envolvente. De este comando 
y sus aplicaciones nos ocuparemos pró- 
ximamente. 

HACEE5D0 MUSICA COI PLAY 

Hemos asegurado anteriormente que 
utilizar el macrolenguaje musical era ex- 
tremadamente sencillo y es más, con 
unos conocimientos musicales muy ru- 
dimentarios es posible obtener resulta- 
dos sorprendentes. Antes de entrar en 



materia con PLAY, vamos a dar unos 
pequeños rudimentos de teoría musical 
para que cualquier lector que desea pro- 
gramar una melodía de cuya partitura 
disponga pueda realizar una adaptación 
musical. 

Los cuadros A y B ilustran la notación 
habitual que se utiliza en música y su 
equivalencia en comandos de PLAY. 

CUADRO A 



ben saber qué nota es la que han de uti- 
lizar. El MML (Music Macro Language) 
soluciona este problema muy sencilla- 
mente. La notación musical inglesa utili- 
za letras del alfabeto para denominar las 
notas musicales de la siguiente manera: 
Notación habitual: DO RE MI FA SOL 
LA SI 

Notación Inglesa: C D E F G A B 



DUBACI05DE 
LAS NOTAS 



Redonda 
(4 tiempos) 
L1 



jan jgd mnu 



Blanca 
(2 tiempos) 
L2 



Negra 
(1 tiempo) 
L4 



Corcheas 
1/2 tiempo) 
L8 



(1/4 tiempo) 
Icorcí 
L16 




Semifusas 
(1/16 tiempo) 
L64 



(1/8 tiempo) 
Fusas 
L32 



Tresillos de corchea 
(1/3 tiempo) 
L9 



CUADRO B 



DUHACIONDE 
LOS SILENCIOS 



(2 tiempos) 
R2 



(1/2 tiempo) 
R8 



(1/8 tiempo) 
R32 



(4 tiempos) 
R1 



(1 tiempo) 



(1/4 tiempo) 
R16 

f 

(1/16 tiempo) 



Pero aquellos lectores que no saben 
música, no tienen suficiente con esto 
para transcribir una partitura. Además 
de saber la duración de cada nota, de- 



Pero claro, de poco sirve esto cuando 
uno se enfrenta con una partitura llena 
de extraños símbolos sobre un penta- 
grama. Para solucionar esto en alguna 
medida, vamos a facilitar la pequeña ta- 
bla «C» para las equivalencias en el 
pentagrama. 

Habrán visto nuestros sagaces lecto- 
res que hemos introducido un concepto 
nuevo: «O»; que significa octava. El 
MML permite trabajar con un máximo de 
8 octavas numeradas de la 1 a la 8. La 
octava determina el que un sonido sea 
agudo o grave. Como se puede ver en la 
figura anterior, cada octava comienza 
en Do (C) y termina en Si (B). También 
puede apreciarse en el gráfico citado 
que la sucesión de las notas es correlati- 
va en el pentagrama tanto para la clave 
de Sol como para la de Fa. Hemos in- 
cluido la especificación de las notas en 
las dos claves, porque normalmente las 
partituras de piano trabajan con ambas; 
la clave de Fa para la mano izquierda 
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♦ • 



Clave de Sol 




|C D E F G A B| CDEFG AB| CPE 



Octava medía (04) 



06 



Clave de Fa 



CDEFG ABC, 



02 



03 



04 



TABLA C 




I t i t t : ♦ S 1 l - 
o w t r t v u i o r ¡ 




(notas más graves) y la clave de Sol 
para la mano derecha (notas más agu- 
das). Aún debe saber un par de cosillas 
más nuestro intrépido usuario del MML. 



Es frecuente encontrarse unos puntos 
(.) llamados puntillos en las partituras. 
Estos indican que la nota a la que siguen 
debe alargarse en la mitad de su valor; y 



en el macrolenguaje de los MSX se re- 
presentan de la misma manera: Por 
ejemplo: 



SÉ 



Sería 05L8C. L16D o bien 05C8. 
D16 



También se encontrará con otros cu- 
riosos símbolos como # (sostenido) 
que indica que la nota en cuestión debe 
subir medio tono, o (bemol), que indi- 
ca que debe bajarse medio tono. En 
MML, los sostenidos se representan con 
# o bien con + y los bemoles con -. 

También es frecuente que los sosteni- 
dos o bemoles aparezcan al principio de 
la partitura al lado de la clave. Esto, en 
términos musicales se denomina «ar- 
madura» (es lo que sirve para definir las 
tonalidades mayores o menores) e indi- 
ca que todas las notas que estén en el 
mismo renglón que él o los sostenidos o 
bemoles deben subirse o bajarse medio 
tono (según haya un sostenido o bemol) 
y esto vale para todas las notas que 
ocupen esas posiciones en la partitu- 
ra en cualquier octava excepto para 
aquellas que vayan precedidas del sím- 
bolo (becuadro) que anula la altera- 
ción. Por ejemplo: 




Sería: D4 F 8 E8 05 C 4D4 



4 






#—t — = 








— i 





Sería: F4B 405C04B4 

Tal vez haya mucho material junto en 
este artículo para aquellos que no po- 
seen nociones musicales, pero estamos 
convencidos de que si siguen esta pe- 
queña serie, pronto serán capaces de 
realizar adaptaciones que van a sor- 
prenderles. Para que se hagan una idea 
de lo que podrán hacer, aquí van un par 
de líneas junto con la partitura de donde 
están extractadas para que puedan 
comprobar prácticamente algunas de 
las cosas que decimos. ¡ Hasta el mes 
que viene! 

10 PLAY "L16 E D#E F G F#G E 
A8 A8 F#4 G8. F#16 E8 E8 F# 
.F#1 6 D#8 D#8 E8 E1 6 El 6 C1 6 
C16C16C16 03 A4B4 04E2 
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2. a GRAN 


[¡¡a 


CONCURSO 


PROGRAMA 


DEL AÑO 



CREA Y ENVIANOS TU PROGRAMA. HAT PREMIOS PARA TI Y PARA LOS QUE 
TE VOTEN. CADA MES PUBLICAREMOS A MAS DE UN GANADOR QUE OPTARA 
POR EL «LISTADO DE ORO» Y UNA FABULOSA UNIDAD DE DISCO. 




BASES 



1- Podrán participar todos nuestros 
lectores cualquiera sea su edad, con 
uno o más programas. 

2- Los programas se clasificarán en 
tres categorías: 

A- Educativos 

B- Gestión 

C- Entretenimientos 

3- Los programas, sin excepción, debe- 
rán ser remitidos grabados en cas- 
sette virgen, debidamente protegida 
dentro de su estuche plástico en el 
que se insertará el cupón-etiqueta 
que aparece en esta misma página, 
debidamente rellenado. 

4- No entrarán en concurso aquellos 
programas plagiados o ya publicados 
en otras publicaciones nacionales o 
extranjeras. 

5- Junto a los programas se incluirán 
en hoja aparte las instrucciones co- 
rrespondientes, detalle de las varia- 
bles, ampliaciones o mejoras posi- 
bles y todos aquellos comentarios 
que el autor considere de interés. 

6- Todos los programas han de estar es- 
tructurados de modo claro, separan- 



do con REM los 
del mismo. 



PREMIOS 



7- SUPER JUEGOS EXTRA MSX otorga- 
rá los siguientes premios: 

AL PROGRAMA EXTRA MSX DEL 
AÑO 

«EL LISTADO DE ORO» 
Una Unidad de disco 
valorada en más de 80.000 ptas. 

8- Los programas seleccionados por 
nuestro Departamento de Programa- 
ción y publicados en cada número de 
nuestra revista recibirán los si- 
guientes premios en metálico: 

Programa Educativo 10.000 pts. 
Programa de Gestión 10.000 pts. 
Programa de Entretenimiento 
6.000 pts. 

9- SUPER JUEGOS EXTRA MSX se re- 
serva el derecho de publicar mera de 
concurso aquellos programas de re- 
ducidas dimensiones que sean de in- 
terés, premiando a sus autores. 

FALLO Y JURADO 

10- Nuestro Departamento de Progra- 



mación analizará todos los progra- 
mas recibidos y hará la primera se- 
lección, de la que saldrán los progra- 
mas que publiquemos en cada núme- 
ro de S.J. EXTRA MSX. 

1 1- Los programas recibidos no se devol- 
verán, salvo que el autor lo requiera 
expresamente. 

12- La elección del PROGRAMA MSX EX- 
TRA DEL AÑO se hará por votación 
de nuestros lectores a través de un 
boletín que se publicara en el mes de 
octubre de 1986. 

13- El plazo de entrega de los programas 
finaliza el 14 de noviembre de 1986. 

13- El fallo se dará a conocer en el núme- 
ro del mes de enero de 1987, entre- 
gándose los premios el mismo mes. 



REMITIRA: 
CONCURSO EXTRA 
MSX 

Roca i Batlle, 10-12 
bajos 

08023 Barcelona 




TI 



PROGRAMA N. ( 



NOMBRE DEL PROGRAMA 
CATEGORIA 



INSTRUCCION DE CARGA 



AUTOR: 
EDAD: 

CALL E: 

CIUDAD 

N.° DE RECEPCION 



DP 



N.° 

: 



J 
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MUY PRONTO EN TU QUIOSCO 




La primera 
revista de la 
U generación 



MSX 



OTRO PRODUCTO MANHATTAN TRANSFER,® SJL 
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TEST DE ADAPTACION 

Por Manuel Carrera Ribera 

Este programa contiene un test que te permite conocer tu capacidad de adaptación al mundo moderno. 
Con sólo responder SI o NO al inteligente cuestionario sabrás qué posibilidades tienes para asumir y 

superar las duras condiciones de la sociedad actual. 



3 ' AUTOR : MANUEL CARRERA RIBERA 
5 'PRESENTACION 

10 cls:clear90:open"grp: "AS#i 

20 SCREEN2 

30 LINEC0,55:>-C25S,93> , 1 , BF 

40 PRESET (. 1 00 , 60 ) , 1 :PRINT#1 , "-TES 

T-" 

50 PRESET (20 ,70) , 1 :PRINT#1 ,"¿Está 
Vd. adaptado al mundo moder 
no?" 

60 PLAY" T235V 1 OA . C . A#F+B3A2S3M700 
Al 5B2CEF#A1 O" , "VI 2D+E3 . S2M500A20C 
23F+" , "VI 1 S406ACC 1 0BR8S3M 1 300BR4E 
1SD3" 

70 FCRT=0T02000 ¡ NEXTT 

75 ' INICIALIZACION PANTALLA 

80 CLS : WIDTH29 ¡ COLORI 5,4,4: KEYÜFF 

: SCREEN 1 

90 PRINT"La adaptación es la acci 
ón por la cual un ser se ajusta 

al medio en que vive, conc i ~- lia 
ndo sus propias tendenc iascon las 

exigencias que le im-pone ese me 
dio. " 

100 PRINT"E1 mundo moderno es el 
ejem- pío por antonomasia de medi 
o exigente del que nadie puede es 
capar . " 

110 PRINT" ¿Está Vd. verdaderament 
e adaptado a la vida moderna?. El 
cuestionario que sigue le ayuda 
ra quizá a tomar conc i ene i ade su 
actitud profunda de ca-ra a esta 
cuestión: Acepto Co No) mi época 



rápidamente co 



SI o un NO, en este examen d 
primer impulso es 



120 PRINT"Responda 
n un 

e conc i ene i a, el 

el bueno . " 
130 PRINT"PULSA UNA TECLA. . . " 
140 T*=INKEY* : IFT*="" THEN 140 
150 IFT*=CHR*<:32>THEN1 70 
155 'INICIO VARIABLES 
l 60 N*=" " : A*=" " : A=o : B=0 : c=o : D=o : E 
=0 : F=o 

165 'INTRODUCCION NOMBRE 

170 CLS ¡LOCATE, 12 ¡PRINT" C No más d 



e 25 carác teres INPUT" INTRODUCE 

TU NOMBRE" ; N* 
175 ' PROGRAMA PRINCIPAL 
1 80 CLS ¡ LOCATE 1,10:1 NPUT " -E 1 r i tm 

0 de la vida moderna es bastante 

1 nhumano" ; A* 

190 IFA*="SI"THENA=A+1 
200 I F A* < > " S I " AND A* < > " NO " THEN 1 80 
21 0 CLS ¡ LOCATE 1 ,10: I NPUT "Apenas m 
e apetece tomar el avión"; A* 
220 IFA*="SI"THENA=A+1 
230 I FA* < > " S I " ANDA* < > "NO" THEN2 1 0 
240 CLS: LOCATE, 10¡ INPUT"Todas las 
noches sigo el pro-grama de tele 
visión" ;.A* 

250 IFA*="SI"THENC=C+1 

260 I FA* < > "SI" AND A* < > " NO " THEN240 

270 CLS: LOCATE, 10: INPUT"Compro a 

crédito siempre que es posible"; A 

* 

280 IFA$="SI"THENC=C+1 
290 I FA*< > " S I " ANDA$< > " NO" THEN270 
300 CLS ¡ LOCATE ,10¡I NPUT " P i enso qu 
e los tejidos sinté-ticos y los t 
radie ionales tienen cada uno sus 
ventajas,-/ y* me visto con unos 
u otros" ; A* 

10 IFA*="SI"THENB=B+1 
320 I FA$ < > " S I " ANDA* < > " NO " THEN 3 00 
330 CLS ¡LOCATE, I0¡ INPUT" Sólo el m 
a r i do debe de c i d i r los gastos i rn 
portantes" ; A* 
340 IFA*="SI"THENA=A-i-l 
350 I FA*< > " S I " ANDA* < > " NO" THEN330 
360 CLS ¡LOCATE, 10¡ INPUT"Hago mis 
pagos con cheques"; A* 
370 IFA*="SI"THENB=B+1 
330 I FA*< > "SI" ANDA*< > " NO" THEN360 
390 CLS : LOCATE ,10: INPUT"He hecho 
dos seguros, además de los obliga 
tor ios" ; A* 

400 IFA*="SI"THENB=B+1 
410 I F A* < > " S I " AND A* < > " NO " THEN390 
420 CLS : LOCATE , 1 0 ! INPUT" El «autos 
ervicio'.*- es el úni corestaurante e 
n el que el ser-vicio es racional 
" ; A* 



1^ 




430 I FA*=" 3 I " THENC=C+ 1 
440 I FA* < > " S I " ANDA* < > " Nü " THEN420 
450 CLS : LOCATE , 1 O ! I NPUT " He hec ho 
más de dos seguros además de los 

ob 1 i ga tor i os " ; A* 
460 IFA*="SI"THENC=C+1 
470 I F A* < > " S I " ANDA* < > " NO" THEN450 
480 CLS : LOCATE ,10: INPUT"Para los 
pagos, la cuenta de crédito es el 

m e d i o m á s c o m o ~ d o " ; A * 
490 IFA*="SI"THENC=C+1 
S00 I FA*< > " 8 1 " ANDA*< > " NO" THEN480 
51 0 CLS : LOCATE ,10: INPUT"Pref iero 
los tejidos sintéti-cos y los el i 
jo tan a menudo como puedo" : A* 
520 I FA** 1 ' S I " THENC«C+ 1 
530 IFA*<>"SI"ANDA*<>"N0"THEN51 0 
540 CLS : LOCATE ,10: I NPUT" El mar ido 

y la mujer deben decidir en comú 
n en todo lo queconcierne a los g 
astas impor -tantes de la casa"; A* 
550 IFA*="SI"THENB=B+1 
560 I F A* < > "SI" AND A* < > " NO " THEN540 
570 CLS ! LOCATE , 1 0 ! I NPUT" El avi ón 
se utilizará pronto, incluso para 
pequeños trayec-tos" ; A* 
580 I FA*=" S I " THENC=C+ 1 
590 I F A*< > " S I " ANDA* < > " NO " THEN570 
600 CLS : LOCATE ,10: I NPUT" El c oc he 
no es más que un me-dio de transp 
orte cómodo"; A* 
610 IFA*="SI"THENB=B+1 
620 CLS : LOCATE ,10: I NPUT "Deseo que 

la vida vaya cada vez más depri 
sa";A* 

630 IFA*="SI"THENC=C+1 

640 I F A* < > " S I " ANDA* < > " NO" THEN620 

650 CLS : LOCATE ,10: I NPUT "-No quier 

o televisión en mi casa" ; A* 

660 IFA*="SI"THENA=A+1 

670 I FA*< > "SI" ANDA* < > " NO" THEN650 

680 CLS : LOCATE ,10: I NPUT "No sopor t 

o 1 os t e j i dos s i n t é- 1 i c os y me vi 

sto per f ec tamen-te con tejidos tr 

adi c ionales" J A* 

690 I FA*=" S I " THENA=A +• 1 

700 I F A* < > " S I " ANDA* < > " NO " THEN680 

710 CLS : LOCATE ,10: I NPUT "Es prefer 

ible que el marido y la mujer disp 

ongan de presu- puesto separado" ; 

A* 

720 IFA*="SI"THENC=C+1 
730 I F A* < > " S I " ANDA* < > " NO " THEN7 1 0 
740 CLS ¡LOCATE, 10: INPUT"Pref iero 
pagar al contado to-das mis compr 
as" ; A* 




750 IFA*="SI"THENA=A+1 
760 I F A* < > " S I " AND A* < > " NO " THEN740 
770 CLS: LOCATE, 10: INPUT"Me horror 
iza comer en un au toser vi c i o" ; A* 
780 I FA*=" S I " THENA= A+ 1 
790 I FA*< > " S I " ANDA*< > " NO" THEN770 
800 CLS : LOCATE ,10: I NPUT "Hay quien 
intenta adaptarse al ritmo de rí 
ues t r o siglo" ; A* 
810 IFA*="SI"THENB=B+1 
820 I F A* < > " S I " AND A* < > " NO " THEN800 
830 CLS ¡LOCATE, 10: I NPUT" El avión 
solo es verdaderamente útil para 
v i a j es la r gos " J A* 
840 I FA*=" S I " THENB=B+ I 
850 I FA* < > " S I " ANDA* < > " NO " THEN830 
860 CLS : LOCATE , 1 0 ! I NPUT "No puedo 
prescindi r de 1 c o c he " j A$ 
870 I FA*=" S I " THENC=C+ i 
880 I FA*< > " S I " ANDA*< > " NO" THEN860 



890 CLS ¡ LOCATE , 1 0 ! INPU7 " Ve 



lev i si án 
* 



dos vedes por semana' 



te 

;a 



900 
91 0 

920 
izo 



IFA*~"SI "THENB=B+1 
I FA*< > "SI" ANDA*< > " NO" THEN890 
CLSILOCATE, 10: INPUT"Solo útil 
la compra a cré-dito para gas 
tos importantes" : A* 
930 IFA*="SI"THENB=B+1 
940 I FA* < > " S I " ANDA* < > " NO " THEN920 
950 CLS : LOCATE ,10: INPUT"Fref iero 
pagar en especie"; A* 
960 IFA*="SI"THENA=A+1 
970 I F A*< > " S I " ANDA* < > " NO" THEN950 
980 CLS ¡ LOCATE , 1 0 : I NPUT "Me conten 
t o c on 1 os seguros ob 1 i ga t o r i os " 
; A* 

990 IFA*="SI"THENA=A+1 
1 000 I FA*< > " S I " ANDA*< > " NO" THEN980 
1010 CLS : LOCATE ,10: I NPUT" Como en 
un autoservicio cuan-do' tengo pri 
sa" ; A* 

1020 IFA*="SI"THENB=B+1 

1 030 I F A* < > " SI " ANDA* < > " NO " THEN 1 0 1 

0 

1040 CLS ¡LOCATE, 10: INPUT" El coche 
es un juguete dema- siado peligr 
oso, prefiero el tren" ; A$ 
1050 IFA*="SI"THENA=A+1 
1 060 I FA*< > " S I " ANDA*< > " NO" THEN 1 04 
0 

1 070 CLS ¡ LOCATE ,10: INPUT"Para los 
alimentos, los enva-ses de cartó 
n o de 'materia plástica son cóm 
odos , a veces"; A* 
1 080 I FA*=" S I " THENE=E+ 1 



m m 




1 090 I FA*< > " S I " ANDA* < > " NG" THEN 1 07 

0 

1 1 00 CLS : LOCATE ,10: INPUT"La crgan 
izacion de ayuda a los países e 
n vías de desar rollo es el p r i mer 
deber de lasgrandes naciones"; A* 
1110 IFA*="SI"THEN E=E+1 
1 120 IFA*O"SI"ANDA*<>"N0"THENl 10 
0 

1 1 30 CLS : LOCATE , 1 0 I I NPUT " Apenas c 

reo en la medicina moderna" .: A* 

1140 IFA*="SI"THEND=D+1 

1 I 50 IFA*<>"SI"ANDA*O"N0"THENl 1 3 

0 

1160 CLS : LOCATE ,10: I NPUT" En princ 

i p i o , es toy a f a vo r de 1 os t r asp 1 an 

tes cardiacos , pe-ro me parecen pr 

ematuros hoy" A* 

1170 IFA*="SI"THENE=E+1 

1 1 80 IFA*O"SI"ANDA*O"N0"THENl 16 

0 

1190 CLS:L0CATE, 10: INPUT"-Para el 
homb r e , e 1 des cubri - m i en to de La 
s c aux o de Al t am ira es , r e f 1 ex i ona 
n d o , m á s i m porta n te qu e e 1 é x i i o d 
el au tomo vi 1 " ; A* 
120Ó IFA*="SI"THEND=D+1 
1210 I FA*< > " S I " ANDA* < > " NO" THEN 1 1 9 
0 

1 220 CLS : LOCATE ,10: I NPUT " Las p i 1 d 
oras ant i c onc ept. i vas deberían ten 
er una venta li- bre, para que to 
das las mu je-res pudieran usarlas 
" ; A* 

1 230 IFA*="SI"THENF=F+1 

1 240 I FA*< > " S I " ANDA*< > " NO" THEN I 22 

0 

1 250 CLS : LOCATE ,10: I NPUT" Los enva 
ses de cartón 0 mate-ria plástica 
perjudican el sabor de los alime 
ntos" ; A* 

1260 IFA*="SI"THEND=D+1 

1 270 I FA*< > "SI" AND A* < > " NO " THEN 1 25 

0 

12S0 CLS ¡LOCATE, 10: INPUT"Si se pu 
diera, me gustaría vi-vir en los t 
iempos pasados , en los que el ritmo 

de vida era más tranqui lo" ; A* 
1290 IFA*="SI"THEND=D+1 
1 300 I F A* < > "SI" ANDA* < > " NO " THEN 1 28 
0 

1310 CLS : LOCATE ,10: I NPUT" El desar 
rollo de la astronáu-tica es más 
importante que eldescubr imiento d 
e los manus- critos del Mar Muert 
o" ; A* 



1 320* I FA*=" S I " THENF=F+ 1 

1 330 I FA*< > " S I " ANDA*< > " NO" THEN 1 3 1 

0 

1 340 CLS : LOCATE ,10: I NPUT" Soy f el i 

z por vivir en el si~glo XX"; A* 

1350 IFA*="SI"THENE=E+1 

1 360 I FA*< > " S I " ANDA*< > " NO" THEN 1 34 

0 

1 370 CLS ! LOCATE ,10:1 NPUT" Las p i 1 

doras anticonceptivasson contrari 

as a la moral y, lo que es más gr 

ave, a la fi~ Biología" ;A$ 

1 380 IFA$="SI"THEND-D-H 

1 390 I FA*< > " S I " ANDA*< > " NO" THEN 1 37 

0 

1 400 CLS : LOCATE ,10: INPUT"Las pi Id 
oras ant i conceptivas deben ser co 
ns i de radas como un medicamento ú 
til, que se debe usar con pruden 
cia" ; A* 

I 4 1 0 IFA*="SI"THENE=E-H 

1 420 I FA*< > " S I " ANDA* < > " Nü" THEN 1 40 

0 

I 430 CLS : LOCATE ,10: INPUT"Pref iero 
saber la opinión de varios espec 
i al istas , cuando algo no marcha b 
i en" ; A* 

1 440 I FA*= " S I " THENF=F+ 1 

1450 I F A* < > " S I " ANDA* < > " M0 " THEN 1 43 



1 460 CLS : LOCATE ,10:1 NPUT" La 
urbana intoxica el cuerpo 
esp í r i tu ; hay que i r a Vi vi r 
mpo" ; A* 

IFA*="SI"THEND-D+I 
I FA*< > "SI" ANDA*< > "NO" THEN 1 46 



vida 
y el 
al ca 



1 470 
1 480 
0 

1 490 CLS ! LOCATE ,10: INPUT"E1 progr 
eso técnico a mejora-do sensiblem 
ente el ni ve 1 de v i da gene r a 1 , pe r 
o hay que desconfiar de su influe 
ocia de- f o r man te " ; A* 

I FA*=" S I " THENE-E-i- 1 
I F A* < > " S I." ANDA* < > " NO " THEN 1 49 



1 500 
1510 
0 

1 520 
de j ar 
a que 



CLS : LOCATE ,10: I NPUT "Hay que 
al ni ño mu cha 1 i be r tad pa r 
su carác terse desarrolle ar 



m ó n i c ame n t e " ; A * 

1530 IFA*="SI"THENF=F+1 

1 540 I FA*< > " S I " ANDA*< > " NO" THEN 1 52 

0 

1 550 CLS : LOCATE ,10: INPUT"E1 desar 
rollo técnico actual mata la vida 

del espíritu" ; A* 
1560 IFA*="SI"THEND=D+1 



i 




KUüKrB ii i-> 



1 570 

Ó 

1 580 CLS : LOCATE ,10: INPUT" Tengo rná 

s confianza en núes- tro médico d 

e cabecera que en la opinión de lo 

s espec ial is-tas" ; A* 

1590 IFA*="SI"THENE=E+1 

1 600 I FA*< > " S I " ANDA* < > " NO" THEN 1 58 

0 

1610 CLS: LOCATE, 10: INPUT" ¿Podría 

Vd . c i t a r ano r a m i smo t res«s 1 ogans 

:*• de detergentes" ; A* 

1 620 I FA*=" S I " THENF=F+ 1 

1 630 I FA* < > " S I " ANDA* < >" NO " THEN 1 6 1 

0 

1 640 CLS : LOCATE , 1 0 : INPUT"E1 viaje 
a la Luna es una ha-zaña que cue 
sta muy cara y que no nos ha en 
senñado mu choque no supiéramos ya 
" ; A* 

1 650 I F A*= " S I " THEND=D+ 1 

1 660 I FA*< > " S I " AÍNDA* < > " NO" THEN 1 64 

0 

1 670 CLS : LOCATE , 1 0 : INPUT"E1 prtífe 
sor Barnard, con mi primer trasp 
1 a n t e de c o r a z o n , h a a b i e r t o u n n u 
evo c ap i t u 1 o de 1 a med i c i na " J A* 
1 680 I FA*=" S I " THENF*F+ 1 
I 690 I FA*< > " S I " ANDA*< > " NO" THEN 1 67 
O 

1 700 CLS ¡ LOCATE -,1 0 ¡ I NPUT" Los n i ño 
s tienen necesidad deser sometido 
s , en todo , a una estricta d i s c i p 1 
i na" ; A* 

I 7 1 0 I FA*=" S I " THEND=D+ 1 

1 720 I FA*<> " 8 í " ANDA*< > " NO" THEN 1 70 

0 

1 730 CLS : LOCATE ,10:1 NPUT " V i v i r en 
la ciudad es agrada-ble a condic 
ión de pasar los fines de semana 
en el campo" ; A* 
1 740 I FA*=" S I " THENE=E+ 1 
1 750 I F A*< > " S I " ANDA$< > " NO" THEN 1 73 
0 

1 760 CLS : LOCATE , 1 0 ¡ INPUT "No me en 

cuentro ver dader amen- te bien más 

que en la ciudad"; A* 

1 770 I FA*=" S I " THENF=F+ 1 

1780 IFA*<>"SI"ANDA*<>"N0"THEN1 76 

0 

1790 CLS : LOCATE, 1 0 : INPUT" ¿Sabe V 
d. de memoria tres «slogans» de 

detergentes" ; A* 
1800 IFA*="SI"THENE=E+1 
1 8 1 0 I F A* < > " S I " ANDA* < > " NO " THEN 1 79 
0 







1 820 CLS : LOCATE ,10: INPUT "Nuestra 
felicidad futura reside en las me 
joras técnicas, cada vez más nurn 
e rosas" ; A* 

1 330 I F A*= " S I " THENF=F+ 1 

1 840 I FA*< > " S I " ANDA*< > " NO" THEN 1 82 

0 

1 850 CLS : LOCATE ,10:1 NPUT" Segu i c o 

n cur i os i dad , en la televisión , la 

retransmisión de los primeros pas 

os del hombreen la Luna"; A* 

1 860 I FA*=" S I " THENE=E+ 1 

1 870 I FA*< > " S I " ANDA* < > " NO" THEN 1 85 

0 

1 880 CLS : LOCATE , 1 0 : I NPUT" La i da y 
vuelta Ti erra -Luna es una avent 

ura apasionante en la que quise 

par tic ipar , siguiendo la emisión e 

n directoa las 4 de la mañana por 
te- levisión";A* 

1890 IFA*="SI"THENF=F+1 

1 900 I F A* < > " S I " ANDA* < > " NO" THEN 1 88 

0 

1 910 CLS : LOCATE , 1 0 ¡ INPUT" El tras 

plante de corazón , mu-cho ruido y 

pocas nueces" ; A* 

1920 IFA*="SI"THEND=D+1 

1 930 I F A* < > " S I " ANDA* < > " NO " THEN 1 9 1 

0 

1940 CLS : LOCATE , 1 0 ! INPUT "En mi op 
inion,la edad de oro está por des 
c ub r i r en los si ~g 1 os f u tur os , que 
se beneficiarán de los progresos 
de la c i v i 1 i zac i on" J A* 
1 950 I FA* = " S I " THENF=F >- 1 
I 960 I FA*< > " S I " ANDA* < > " NO" THEN 1 94 
(I) 

1965 ' SUMA VARIABLES, Y BIFURCACI0 
N SEGUN VALOR 
1 970 Z=A+D : Y=B+E ! H=Ch F 
1930 IF Z=20 AND Y==20 AND H :>20 T 
HEN 2170 ELSE IF Y=20 AND H=20 AN 
D ZO2.0 THEN 2170 ELSE IF H=20 AN 
D Z=20 AND Y<=20 THEN 2170 
1990 IF Z>Y AND Z>H THEN G0SUB 20 
10 ELSE IF Y>Z AND Y>H THEN GOSUB 
2060 ELSE IF H>Z AND H>Y THEN GO 
SUB 21 1 0 
2000 END 

20 1 0 CLS : PR I NT " Vd . " ; N* ! PR I NT " D i f i 
cuitad o rechazo, consciente o inc 
onsc i ente , ante la vi -da moderna." 
i 

2020 PRINT"Es cierto que Vd. expe 
rimen ta dificultades de adaptac i 
on.Las grandes tendencias de núes 




t r o s i g 1 o , 1 a veloci dad , 1 a téc n i c a 
,el confort, la mecanización, etc . 
, no van con su temperamento. " ; 
2030 PRI~NT"Vd. sueñacon un rincón 

tranquilo, en u~na vida más sene i 
lia y sosegada , en una época ya pa 
sada . Da la espa 1 da a lo que es ve 
rda-der amenté actual . " ; 
2040 PRINT"Esto tiene que plante 
arle problemas en su existencia 
profesional y fami 1 iar . Esfuerces 
e en luchar contra esa tendencia, a 

fin deno convertirse en el Alces 
tesde su siglo . " 
2050 END 

2060 CLS:PRINT"Vd. " J N* : PRINT" Adap 
tación a la vida moderna acompaña 
da de alternativa y discernimien 
to . " J 

2070 PRINT "Sabe conjugar armónica 
mente los inconvenientes y las ve 
ntajas de nuestraépoca , que Vd.ace 
pta,pero da muestras de tacto y 
discerni-miento. "; 

2080 PRINT'MJtiliza los progresos 
de la técnica, pero no profésalas 
ideas modernas más que en la medid 
a en que le parecen razonables." 
2090 PRINT"Sin ilusiones en cuant 
o a lasexagerac iones y los snob i s 

mosde la vida moderna , ios sopor t 

a sin api* op i á r se 1 os ; Vd . v i enea se r 

el Filinto de su siglo." 
2100 END 

21 10 CLS:PRIN7"v-d. " J N$ ¡ PRINT "Supe 
r adap tac i-ón de quien vivecomo en 
s i mb i os i s 



c on 



i u 



2 120 PRIMT"Vd.se desliza en la vi 
da moderna como pez en el agua 







Está muy al corriente de lá actu 
a l i dad y en su e-ntusiasmotiene te 
ndencia a hacer suyastodas las no 

vedades de la é poca."; 

2130 PRINT "Su adaptación a la vid 
a m o d e r na e s , s i n d u da , e x celent e p e 
ra es una h i per adap tac i on que se 
produce en detrimento de la ríqu 
eza interior y de la personal ida 
d profunda . " ; 

2140 PRINT "La verdader a adap tac i 
ó n , 1 a f ruc - 1 i f e r a , v a a c o m p a ñ a ':::l a d 
e un esfuerzo que en Vd, casi no e 
x i st^e . Luche con t r a e s a t e nd e n e i a n 
o sea que se convierta en elTriss 
otin de su época." 
2150 END 

2170 CLS : PRINT" Vd. " J N* ! PRINT"Es e 
n c on j un to , o t r a f o r ma vá - 1 i da de 
adaptación a la vida moderna . Acep 
ta c i e r tas t enden c i as de su s i g I o 

y rechaza o--t ras. Esto demuestra 
en V d . u n t e m pera m e n i o d e u n a p i e z 
a . " 

2180 PRINT" Intente reducir las co 
ntradi c c iones que su actitud entr- 
aña i ndefec tibí emente , y f o r mese u 
na idea más matizada de las difer 
e n tes tendencias de 1 a v i d a m o d e 
rna que, sin duda , no merecen el ex 
agerado honor o indignidad que Vd 
.les atr i bu -ye . " ; 

2 1 90 PR I NT " Qu i zá , 1 1 egado al té r m i 
no de este pequeño examen de con 
c i ene i a , tenga Vd . una i dea másprec 
isa de su grado de adaptación a 1 
a vida moderna . " 
2200 END 
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KABATE NIGHT 



Por Darío García 




Bob, el karateka debe llegar al tatami y desactivar las bombas y trampas colocadas en todas las 
habitaciones de sn casa por robots enemigos. In el mismo programa están las instrucciones. 

; . 



18 REM KARATE KNIGH 

20 REM Por Darío García 

30 REM Para MSX EXTRA 

40 ON STRIG GOSUB 2190.2190,2190,2190,21 
90 :CÜLOR, 1 . 1 

50 C$="c8u3015u51 10u?r80d71 10d515d3015u3 
0140d3015" 

60 SCREEN 2,2:0PEN "grp:"AS#l 
70 PRESE TC 70, >50D :COLOR 10:PRINT#1. "KARAT 
E-NIGHT" :CGLOR 8 :PRESETC50, 803 :PRINT#1 , " 
Espere un momento .." :i_ INE C80, 1703-C 150. 
155D.2,B:PRESETC97. 1603 :COLOR 10:PRINT#1 
. "D.G.C" 

^80 REM ****** SPRITES ******** 
-90 FOR N*=0 TO 32:A*= ,M ' 
400 FOR I*=t TO 32-.READ Q : A$=A$+CHR$CQ3 : 
NEXT I*:SPRITE$CN*]=A$ 
110 NEXT H% 
120 GOTO 2680 

"130 REM ****** PANTALLA ****** 
140 SCREEN 0:SCREEN 2:LINE C 20. 303 -C240. 
353. 10,BF:LINE C20, 403 -C240, 45 3 , 7. BF :LIN 
E f20, 1853-C240. 1 91 3 , 7. BF :L INE C20, 1303- 
C25, 183 3. 14.BF:LINE C235, 1303-C240. 1833 . 
14, BF 

150 Y = 60:FOR N^0 TO 5 :PSETC20, Y3 :DRAU"C6 
R10U10L10D10"' :PAINT C 25, Y-53 , 6 :Y=Y+13 :NE 



XT N:LINE f 109. 03-C 130, 203,6, B:LINE C135 
,03 -f 240, 203 , 6. B 

160 Y^60:rOR N^0 TO 5 :PSETC230, Y 3 :DRAlxl"C 

6R10U10L10D10" :PAINÍ C235. Y-53 . 6 :Y=Y+13 : 

NEXT N:lF P-0 ÍHEN PLAY E$ 

170 IF P<>6 THEN PUT SPRITE 0. C219. 1503 . 

10.23 

180 L1NE f20.03-C40.203.6.B 
190 LINE C47.03-fl05. 203.6. B 
200 iru--0THENPRESETC 100. 1003 :COLOR 10*PR 
INT# \ , "GAME OUER' :f r ORN-0TO500 :NEXTN :PUTS 
PRITE10, C255. 191 3. 1 :PUTSPR I TE 1 1 . C255, 191 
3, 1 :PUTSPRITE12, f 255, 191 3. 1 :PUTSPRITE13. 
C255, 1913.1 :PUTSPRITE14, C255, 1913,1 
-210 IF U--0 THEN Y--130:X^125:STRIGC03OFF: 
STRIGC 1 30FP :FOR N=0 TO 88:PUT SPRITE 10. 
fX.Y3.6.20:PUT SPRITE 1 1 . CX+1-6. Y3 , 15, 21 : 
PUT SPRITE 12. CX+32, Y3, 15,22:Y=Y-1 :NÉXT 
N:FOR N--0 TO 500:NEXT N:GOTO 2680 
220 IF U=l THEN PUT SPRITE 7. C49, 23 . 10. 0 

230 IF U^2 THEN PUT SPRITE 7, C49, 23 . 10. 0 
:PUT SPRITE 8, C67. 23 , 10, 0 

240 IF U=3 THEN PUT SPRITE 7. C 49, 23 . 10. 0 
:PUT SPRITE 8, C67. 23 , 10. 0 :PUT SPRITE 9. C 
85.23. 10,0 

250 PRESET C 1 1 0, 4 3 ¡COLOR 6 :PRINTttl . Ul :GOS 




w i i\uui\m ¡ru 



UB 350 

260 IF P=0 THEN 750 

270 ON P GOTO 470,610,860,960.1080.1200, 
1320, 1420, 1580, 1660. 1780. 1910 
280 COLOR 10.1.l:GOTO 260 
290 FOR N=0 TO 500:NEXT N:PUT SPRITE 10. 
C255. 1913. 1 :PUT SPRITE 1 1 . C255. 131 D , 1 :PU 
T SPRITE 12. C255. 1913. 1 :PUT SPRITE 13, C2 
55, 1911. 1 :PUT SPRITE 14, C255. 191 3 . 1 
•-300 PUT SPRITE 10, CX, Y+323 , 6, 20 :PUT SPRIT 
Ell.CX+16. Y+323. 15,21 :PUT SPRITE12, CX+32 
.Y+323. 15,22 :FOR N-0TO500 :NEXT N :RETURN 
310 REM ****** COMIDA ****** 
320 PUT SPRITE30, C100, 168 3 . 10. 16 :PUT SPR 
ITE31 . f 1 16, 168) , 10, 15:RETURN 
330 IFB=1THENIFX<132ANDX> 1 00ANDY= 1 35THEN 
COLORI :PRESETC 1 10,43 :PRINT#1 ,U1 :C0L0R6:U 
1^U1+3:PRESETC 1 10.43 :PRINT#1.U1 :PUTSPRIf 
E30, C255. 1911,1, 1S :PUTSPRI TE31 . C255. 1911 
, 1. 16:B=2:FORN=0TO20:BEEP:SC=SC+15:NEXTN 

340 RETURN 

350 REM ***** OBJETO ***** 
360 PUT SPRITE 6. C22. 23 . 10, S :FOR N=0 TO 
5 :PLAY" vl5o8c " :BEEP ¡NEXT N 
370 RETURN 

380 REM ***** ROBOT ***** 
390 PUT SPRITE 19. CX2, Y23 . 15. 30 :PUT SPRI 
TE 20, CX2.Y2+163. 15.31 :PUT SPRIÍE 21.CX2 
.Y2+323. 15.32 
400 IF X2<40 THEN X2=180 

410 IF Y=94 AND X<X2+16 AND X>X2-16 THEN 
RETURN 

420 IF X<X2+16 AND X>X2-16 AND A2-6 THEN 
X2=200:FORN^0 TO 6 :PLAY'V15o8c " :BEEP :NE 
XT N:B1=2:SC=SC+50:RETURN 
430 IF Bl=2 THEN X2= 180 :C 1 -- 1 0 :B1 -- 1 
440 IF X<X2+16AND X>X2~16 AND Y<134 AND^ 
>90THENX2 = 200 :FOR N=0TO6 :BEEP :PLAY"U1501 
C ,r :NEXTN :B1=2 :SC=SC+100 '.RETURN 
450 IF X<X2+16 AND X>X2-16 AND A2<>27 AN 
D A2<>6 AND Y=135 THEN FOR N=0 TO 15:BEE 
P:NEXT N:U=U-1 :U1=6:SC=SC-50:SCREEN 0:SC 
REEN 2: GOTO 130 
460 RETURN 

470 REM ***** 2 PANTALLA ****** 
480 PRESETC 150, 53 :PRINT#1 , "COCINA" 
490 LINE C100.453-C103.603.7.BF:PSET C50 ' 
. 1853 :DRAUI C$:PAINT C 53. 1803 . 8 :L INE C r5J5__ ^ 
. 1853-C 185. 1913. 1 . BF :L INEC 155. 1433-C185\ ^ 
1403.6.BF:PUT SPRITE 4, C 160, 543 , 2. 15 
500 PUT SPRITE 2. C87.603, 10, 13:PUT SPRI^ 
E 3, f 101 .60 3 . 10, 14 :L INEC 150, 703-C 190.75 3 
. 10,BF:LINEC150. 1803-C 190. 143 3. 14,BF:LIN 
EC153, 1773-C168. 1*6 3 . 1 . B :L INEC 172, 1773-C 
187. 1463. l.B 

510 A=0:A1 = 1 :A2=2:A3=3:A4=4:X=40:v=94:T-_ 
X:C=1 :X2=100 
520 GOTO 2050 

530 IF X<40 AND Y=135 THEN P=P-l:SCREEN 
0:SCREEN 2:G0T0 130 

540 IF X>135 AND X<180 AND Y^135 THEN P~- 
4 : SCREEN0 : SCREEN2 : GOTO 1 30 
550 IFX> 123ANDX<135ANDY=94THENY.= 135 
560 IFX<40 AND Y=94 THEN X=40:T^=X 
570 IF X>200 THEN P=P+l:SCREEN 0:SCREEN 
2:SC=SC+10:GOTO 130 



r 



580 
590 
600 
610 
620 
630 



Y=135 



GOSUB 380 
IF X>190 AND 
RETURN 

REM ***** 3 PANTALLA ****** 
PRESETC 150. 53 :PRINT#1 . "COMEDOR" 
PUTSPRITE2. C 86. 453. 10, 1 3 tPUTSPRI TE3; 
C 100. 453. 10, 14 :PUT- SPRITE 4, C 1 50. 453 . 1 0. 
13:PUT SPRITE 5. C 166. 453 , 10. 14 
640 LINE C60. 1853-C90. 1913. l.BF:PSET CÍ4 
0. 1853 :DRAUI C$:PAINT C 143. 1823 . 8 : IF SOI 
1 THEN PUT SPRITE 15, C 160. 1263 . 10, 11 
650 X2= 120 :GOTO 2040 

660 IF X<80 AND X>50 AND Y>130 THEN U^U- 
l:Ul=6:F0R N=0 TO 20:BEEP:NEXT N:SCREEN 

0. -SCREEN 2:G0T0 130 
670 IF X<120 AND Y<=94 THEN Y=135 
680 IF X>120 AND Y<135THEN Y=94 
690 IT XM60 AND X<176 AND Y=94 AND SX1 
1THEN S=li:PUT SPRITE 15, C255. 191 3 . 1 :GOS 
UB 350 

700 IF X>190 AND Y<=94 THEN Y=135 
710 IF X>200 THEN P=P+1 :SCREEN 0:SCREEN 
2:SC=SC+10:GOTO 130 

720 IF X<40 THEN P=P-1 :SCREEN 0:SCREEN 2 
:GOTO 130 
730 GOSUB 380 
740 RETURN 

750 REM ***** 1 PANTALLA ***** 
-K760 PRESETC 150. 53 :PRINT#1 . "RECIBIDOR" :LI 
NE C 155. 1853-C 180, 191 3 , 1 ,BF:LINE C40. 100 
3-C100. 1803.8.BF:LINE C42, 102 3-C98. 1783 . 

1, B:LINE C44. 1043-C69, 1763. 1 ,B:LINE C71, 
104 3-C96. 1763. 1 .B:LINE C43. 1803-C97. 1853 
.8.BP 

770 LINEC130.453-C133.603.2,BF:PUT SPRIT 
E 15. C116.603. 10. 13:PUT SPRITE 16.C131.6 
03. 10. HrPSET C 140. 1853 :DRAU) C$:PAINT Cl 
43. 180 3.8 :L INEC 190. 45 3-C 193. 603 . 2, BF :PUT 
SPRITE 17. C176.603. 10. 13:PUT SPRITE 18. 
C192.603. 10. 14:X2=200 
780 GOTO 2040 

IF X<120 AND Y=94 THEN Y=135 
IF X<40 THEN X=40:T=X 
GOSUB 380 

IF X>140 AND X<170 AND Y=135 THEN FC 
R N=0 TO 20:BEEP:NEXT N :U=U-1 :U1 =6 :SCREE 
N 0:SCREEN 2:G0T0 130 
)830 IF X>190 AND Y=94 THEN Y=135 
840 IF X>200 THEN P=P+1 rSCREEN 0:SCREEN 
2:SC=SC+10:GOTO 130 
850 RETURN 

860 REM ***** 4 PANTALLA ****** 

0 PRESETC 150. 53 :PRINT#1 , "ASCENSOR" 
80 LINE C150.403-C230, 1913. l.BF'.LINE Cl 
00.453-C103.603.7.BF:PUT SPRITE 2.C86.60 
3.11.1S:PUT SPRITE 3. C 101 . 603 . 1 1 , 14 
«90 LINEC 150,403-C 145, 1 20 3 , 7. BF :L INE C50. 
1853-C 130.85 3, 2, BF:LINEC52. 87 3-C 128, 1103 
, l.B:LINEC52. 1123-C128. 1503. 1,BF:LINEC52 
, 1523-C85. 1833. l.B:LINEC87. 1523 -C 128. 183 
3 . 1 .B:X2=100 
900 GOTO 2040 

910 IF X<40 THEN P=P-1 :SCREEN 0:SCREEN 2 
:GOTO 130 
920 GOSUB 380 

930 IFU=1THENIFX>160THENSTRIGC03STOP:STR 
IGC 1 3STOP:FQRN=0TO100:PUTSPRITE10. CT, Y3. 



790 
800 
810 
820 




6,A:PUTSPRITE11, CX-8.Y+163. 15, Al :PUTSPRI 
TF12, CX+8.Y+16 3, 1 5. A2 :PUTSPR I TE 1 3, CX-8.Y 
♦-32 3 , 15, A3:IFC=1THENPUTSPRITE14. CX+8. Y+3 
2), 15. A4:Y=Y-1 :W=U+1 :NEXTN :P=7 :SCREEN0 :S 
CREEN2:GOTO130 

940 IF U)=l THEN IF C=2 AND X>160 THEN Y= 
Y-i:NEXT N:U=U)+1 :P=7:SCREEN 0:SCREEN 2:G 
OTO 130 
950 RETURN 

960 REM ***** 5 PANTALLA ***** 
970 PRESETC 150, 53 :PRINT# 1 , "SOTANO" 
80 PUT SPRITE 2, C50, 503 . 6. 28 :PUT SPRITE 
3. C67.503.6,28:PUT SPRITE 4, C85, 50 3 , 6, 2 
8:PUT SPRITE 5, C50, 673 . 6, 28 :PUT SPRITE 1 
5, C50,85D.6,28:PUT SPRITE 16, C67. 853 . 6, 2 
8:PUT SPRITE 17. f 85. 853 . 6, 28 :PUT SPRITE 
18. C85.673.6.28 

990 PSET C50, 1853 :DRAU) C$:PAINT C51.1833 
.8 

1000 X=120:FOR N=0 TO 2: p SETCX, 1853 ¡DRAo- 
n c7r30u25130d25" :PSETCX+2, 1833 :DRAüJ ,; C7R2 
6U21L26D21" :PAINTCX+5. 1703 . 7 :PRESETCX-t-5. 
1703 :COLOR 1 :PRINT#1 , "DGC" :X-X+32 íNEXT N 
1X2= 1 80 

1010 GOTO 2030 

1020 IF X>200 THEN P-5¡SC-SC+13 : SCREEN 0 

:SCREEN 2:G0T0 130 

1030 GOSUB 380 

1040 IF X<40 THEN X=40:T^X 

1050 IF X>130 AND Y<135THEN Y=110 

1060 IF X<130 AND Y--U0 THEN Y-135 

1070 RETURN 

1080 REM ***** 6 PANTALLA ***** 

1090 PRESETC 150, 5 3 :PRI NT #1 . "BODEGA" :L [N 

E C50, 1803-C220, 1853.6.BF 

1100 LINE C60.453 -C63.603. 10,BF:LINE fl2 
0, 453 -C 123,603, 10,BF:LINE C 180, 45 3 -f 183. 
603. 10,BF:PUT SPRITE 2, C54 , 603 . 6. 13 : p UT 
SPRITE 3. C114.603.6. 19:PUT SPRITE 4.C174 
.603.6. 19 :IF SX12 THEN PUT SPRITE 5, C 1 2 
5. 1683. 10, 12 

1110 CIRCLEC100. 1403.40.9, ., 1.4:CIRCLE f 
170. 140 3,40.9. .. 1.4: PAI NT C 100. 140 3 . 9 :PA 
INT C170, 1403,9:CIRCLE C 100, 1403 , 37, 1 , , , 
1.4-.CIRCLE C 170, 1403,37. 1. , , 1.4:C0L0R1 :P 
RESETC80. 1303 :PRINT#1 , "TINTO" --PRESET f 15 
3. 1303 :PRINTttl . " JEREZ" 

1120 CIRCLE C100. 1603.4. 1. ., 1.4:CIRCLEfl 
70. 1603.4. 1. . . 1.4:PAINTC100. 1603,1 :PAINT 
C 170, 1603, 1 :X2=180 
1130 GOTO 2030 

1140 IF X<40 THEN P=4:SCREEN 0:SCREEN 2: 

GOTO 130 

1150 GOSUB 380 

1160 IF X>125 AND X<136 AND Y=135 AND S< 
>12 THEN S=12:PUT SPRITE 5, C255, 191 3 , 1 :G 
OSUB 350 

1170 IF X>200 AND S=9 THEN P=6 :SC=SC+15 : 
SCREEN 0:SCREEN 2:G0T0 130 
1180 IF X>200 AND S09THEN X-200:T=X 
1190 RETURN 

1200 REM ***** 7 PANTALLA ***** 
1210 PRESETC 150,5 3 :PRINT#1 , "REFUGIO" 
1220 LI NEC 30. 47 3 -C 230, 573 , 14, BF :L INEC 30. 
47 3-C40, 1303. 14, BF :L INEC 230» 473 -C 220, 185 
3. 14,BF:LINEC220, 185 3 -C 150, 853 . 10. BF :[_ IN 
EC218, 1833-C 152.873. l.B:L INEC 154.893 -C21 
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6. 130 3. l.BF:L INEC 156. 1323- C2 14, 1813. l.B: 
COLOR10:PRESETC 160, 1003 :PRINT#1 . "ÜJHISKY" 

1230 PRESETC 160, 1203 :PRINT#1 , "R. M. R" 
1240 LINEC70.603-C73.703,2,BF:PUT SPRITE 
0. C56.703. 10. 13:PUT SPRITE 2. C71.703.10 
, 14:B=1 :GOSUB 310:IF'S><8 THEN PUT SPRIT 
E 3. C 160. 1523. 1 .8 
1250 GOTO 2030 

1260 IF X<40 THEN P=5:SCREEN 0:SCREEN 2: 
GOTO 130 

1270 IF X>190 THEN X=190:T=X 
1280 IF X>200 THEN P=12:SCREEN 0:SCREEN 
2: GOTO 130 

1290 IF X>160 AND X<176 AND Y=135 AND S' 
>8 THEN S=8:PUT SPRITE 3. C255. 191 3 . 1 :GOS 
UB 350 

1300 GOSUB 330 
1310 RETURN 

1320 REM ***** 8 PANTALLA ***** 
'330 PRESETC 150. 53 :PRINT#1, "DOJO" :LINE C 
'5. 703 - C 150, 903 . 7. BF :PRESET C 6 1.753 :COLO 
R 1 :PRINf#l . ",BOB'S DOJO":LINE C57.723-C1 
48.883 . l.B 

1340 LINE C50. 1853-C200, 1783 . 9. BF :L INE C 
170,453-C173.703,2.BF:CIRCLE C 171. 853. 15 
. 10. . . 1.4:CIRCLE C171. 1153. 15. 10, . . 1.4:L 
INE C160.853-C160.1153.10:LINE C182.853- 
C 182. 1153. 10:PAINT C 171 . 853 . 10 :PAINT C17 
1. 1153. 10:PAINT C 164. 1003 , 10 : PAI NT C178. 
1003 . 10:X2=100 

1350 LINE C 160, 1003 -C 182. 1083 . 7.BF :LINE 
C70, 1003- C 120, 1783. 14, BF:L INE C72, 1023-C 
95. 1763. l.B :L INEC 97. 102 3 -C 1 18, 1 763 . 1 , B :C 
IRCLEC205, 1053. 16.6. .. 1.4 :PA INT C205. 105 
3.6:PRESETC198. 1023 :PRINT#1 , "BB" :PUT SPR 
I TE 2. C 125, 1693, 2,29 
1360 GOTO 2030 
1370 IF X<40 THEN X=40:T^X 
1380 GOSUB 380 

1390 IP X>200 THEN P-8 :SC-SC+18 :SCREEN 0 
:SCREEN 2:GOTO 130 

1400 IF X>125 AND X<136 AND Y-135 THEN P 
-0 :U1 -Ul - 1 :U) - 1 : SCREEN 0:SCREEN 2:G0T0 13 
0 

1410 RETURN 

1420 REM ***** 9 PANTALLA ***** 
1430 PRESETC 150,53 :PRINT#1. "PASILLO" 
1440 LINE C60,453-C63.603.2.BF:PUT SPRIT 
E 2, C45.603. 10. 13--PUT SPRITE 3.C61.603,1 
0,14:LINE C150.453-C153.603.2,BF:pUT SPR 
I TE 4, C135.603. 10. 13:PUT SPRITE 5.C151.6 
03 . 10. 14 

14<50 LINE C 130. 1853- C 170. 85 3. 14. BF:L INE 
C 132. 1833 -C 168. 873 . 1 . B'.LINE C 134. 181 3-C 1 
49.89 3. l.B :L INE C 151 . 893-C 166, 181 3 , 1 . B :C 
IRCLEC 138. 1503.3. 1. ,. 1.4 :PAINT C 138. 150 3 
, 1 :X2=200 

1460 IF SO 10 THEN PUT SPRITE 15, í 180, 16 
83.10, 10 

1470 L INEC 60, 1203 -C 100. 803. 15. BF :L INEC62 
, 1 183 -C 98. 823. 1 . B :PSET C 70. 993 :DRAU"clrl0 
d5e8h8d51 10d6" :PAINTC72. 1023, 1 
1480 GOTO 2030 

1490 I.FX<40THENX -*40 : IFA1 = 1 THENT=X+8 

1500 IF X>200 THEN P~3 '• SC=SC+ 1 000 : SCREEN 

0:SCRE EN 2:GQTQ 130 
_ 
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1510 GOSUB 380 

1520 IF X>115 AND X<1?0 AND Y=135 THEN P 
=7:SCREEN 0:SCREEN 2:G0T0 130 
1530 IF X>182 AND X<198 AND SX10 AND Y= 
135 THEN S=10:PUT SPRITE 15. C255, 191} . 1 : 
GOSUB 350 

1540 IF SO10 AND Y=135THENX=X-3 :T=X 
1550 IF «1*1 THEN T=X 
1560 IF Al-=5 THEN T=X-8 
1570 RETURN 

1580 REM ***** 10 PANTALLA ***** 
1590 PRESETC 150» 53 :PRINT#1 , "DORMITORIO" : 
L INEf 60, 1853 -C 110, 853,9, BF:LINEC62. 1833- 
C 108.873, 1 ,B:LINEC64, 181 3-C84.873. 1,B:LI 
NEC86.873 - C106. 181 3. 1 , B :CIRCL.EC90, 140 3.3 
. 1 . . . 1 . 4 :PAINTf 90, 1403 . 1 

1600 PSETC125. 1853 :DRAU"C6U40DR5D20R80U2 
0R5D40L5U5L80D5L5" :PAINTC127. 1833. 6 :L 'Nr 
C170,4-3-C173.603.7.BF:PUT SPRITE 2. US 
5.603. 10. 13:PUT SPRITE 3. Cl 71 . 603 . 10. i 4 : 
X2=60 

1610 GOTO 2030 

1620 IF X<40 THEN P=8:SCREEN 0:SCREEN 2: 

GOTO 130 

1630 GOSUB 380 

1640 IF X>200 THEN PM0 :SC^SC-1 :SCPEEN 0 
iSCREEN 2:G0T0 130 
1650 RETURN 

1660 REM ***** 11 PANTALLA ***** 

1670 PRESETC 150. 53 :PRINT#1 . "UP-DOtdN" :LIN 

EC150.403-C200.1913.1.BF 

1680 X=45:F0R N=0 TO 2:LINE CX.1853-CX+3 

0. 1603.2,BF:LINE CX+2, 1833-CX+28. 1623. 1 

B:PRESETCX+5. 1683 :COLOR 1 :PRINT#1 , *6Ctt" : 

X=X+35:NEXT N:üü=1 

1690 LINE C60.603-C 100,903. 15, BFrLINE f6 
2.623-C98.883. l.B:LÍNE C 64. 64 3 - C 75. 863 . 1 
,B:LINE C77.643-C96.863. l.B 
1700 X2=135 
1710 GOTO 2030 

1720 IF X<40 THEN P=9:SCREEN 0:SCRFFN 2: 
GOTO 130 

1730 IF X>200 THEN X-200:T-X 
1740 GOSUB 380 

1750 IF X>150 AND X<200 THEN IF S=12 THr 
N P=l 1 :SC=SC+1 1 ¡SCREEN 0:SCPEEN 2:G0T01^¡ 
0 

1760 IF X>150 AND X<200 THEN IF SO 12 TH 
EN P-INTCRNDC 1 3*103 ¡SOPEEN 0 :SCREEN2 :GO t 
O 130 

1770 RETURN 

1780 REM ***** 12 PANTALLA ***** 
1790 PRESET C150, 53 :PRINT#1, "ATICO" :L IMr 
C60,453-C63.603.2.BF:PUT SPRITE 2,C4'.,c 
03,10,13:PUT SPRITE 3. C62, 603 , 10. ' "F c 
09THEN PUT SPRITE 4-, C 1 1 0 , 1 68 3 . 1 0 . d 
1800 PSET C 140, 1853 íDRAüü C$:PAINT M • 
803,8 

1810 LINE C60. 1803-C105. 1003. 1 l.BF:LINE 
C62. 1 783 -C 103. 1023. l.B :LINE C65. 1803 -C 10 
0, 1853. ll.BF:LINE C64, 1043- C 101 . 1503 . 1 . B 
:X2=150 

1820 GOTO 2030 

1830 IF X<40 THEN X=40:T^X 

1840 IF SX9 ANDXM10 ANDX<126 ANDY=135 

THEN S=9:PUT SPRITE 4. C255. 1910 . 1 :GOSUB 

350 
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1850 IF X<120 AND Y=94 THEN Y=135 
1860 GOSUB 380 

1870 IF X>190 AND Y=94 THEN Y^135 

1880 IF X>200 THEN IF S=12THEN P=12:SCRF 

EN 0:SC=SC+234 :SCREEN 2:G0T0 130 

1890 IF X>200 AND S012THEN P-10:SCREEN 

0:SCREEN 2:G0T0 130 

1900 RETURN 

1910 REM ***** 13 PANTALLA ***** 
1920 PRESET C150.53 :PRINT#1, "TATAni" 
1930 LINE C60, 1 85 3- C 200, 1S2 3 , 6, B r :L INE f 
40, 503 -C 220, 1 75 3 , 1 0 . BF :L I NE C42.52 3-C 100 
, 1003 . 1 ,BF :PRESET C48, 703 :COLOR 6:PRINT 
#1. "PUNTOS" :CIRCLE C 1 40. 1 00 3 , 30, 6, , . 1 . 4 : 
PAINTC 140, 100 3.6:X2^200 

1940 PUT SPRITE 2. C 1 30. 903 , 1 . 0 :PUT SPRIT 
E 3. C 160. 1353. 1 ,24 

1950 .LINE C60. 1803-C110, 1103^ 1,BF:LINE C 
62. 1^83 -C 108. 1 123. 1 0, B :SC=SC+2532 
1960 GOTO 2030 

1970 IT X<40 THEN P=11:SCREEN 0:SCREEN 2 
:GOTO 130 
1980 GOSUB 380 

1990 IF X>200 THEN X=200:T=X 
2000 IF X>140 AND S=8 AND Y=135 THEN S=2 
4:PUT SPRITE 3. C255. 1913. 1 :GOSUB 350:GOT 
O 3070 

2010 IF X>200 THEN X=200:T=X 
2020 RETURN 

2030 REM ***** riOUiriIENTO ***** 

2040 A--0:A1 = 1 : A2=2 :A3=3 : A4=4 :X=40 : Y=135 : 

C=i :T=X:N1*1 :M1 = 1 

2050 PUT SPRITE 10. CT. Y3 . 6. A :PUT SPRITE 
ll.CX-8.Y+163.15.Al:PUT SPRITE 12.CX+8.Y 
M63. 15.A2:PUT SPRITE 13. CX-8. Y+323 . 15. A 
3:IF C=l THEN PUT SPRITE 14, CX+8, Y+323 . 1 



5. A4 
2060 
2070 
:PUT 

TE 



D-STICKC Jl 3 

IF D-0 THEN PUT SPRITE 10,CT,Y3,6,A 
SPRITE 1 1 . CX-8, Y+163. 15, Al :PUT SPRI 
12. CX+8.Y+163. 15,A2:PUT SPRITE 13. CX- 
8. Y»-323. 15.A3:X2=X2-3:IF C=l THEN PUT SP 
RITE 14. CX+8.Y+323. 15. A4 

2080 IF D=3 AND Nl = l THEN Al = 1 : A2=2 : A3=3 
:q 4 =4 :X=X+4 :T=X :X2=X2-3 :C=1 :BEEP :N1=2 :G0 
TO 2140 

2090 IF D^3 AND Nl=2 THEN Al = 1 : A2=2 :A3M 
8:A4-26:X=X+4:X2=X2-3:t=X:c=:1 :BEEP:N1 = 1 : 
GOTO 2140 

2100 IF D--7 AND MI - 1 THEN Al = 1 : A2=25 : A3= 
3:A4-4:x=X-4:X2=X2-3:T-X:C=l :BEEP:M1=2:G 
OTO 2140 

2110 IF D=? AND Ml=2 THEN A 1 = 1 : A2=25 : A3= 
18 :A4-26 :X--X-4 :X2-X2-3 :T=X :C=1 :BEEP :M1 = 1 
:GOTO 2140 

2120 IF D=l THEN Al ^5 : A2=6 : A3=7 :C=^ :X2=X 
2-3:T^x-8:PUT SPRITE 14. C255. 191 3 , í . 4 :G0 
TO 2140 

2130 IF D^5 THEN Al 4í :A2=27 :A3=3 :A4=4 :T= 
X:C=1 :X2=X2-3 

2140 IF P--6 THEN GOSUB 330 
2150 IF P=0 THEN GOSUB 790 
2160 ONPGOSUB 530.660.910.1020.1140.1260 

1370. 1490. 1620. ;720. 1830, 1970 
2170 STRIGC 1 30N :STRIGC03ON 
2180 GOTO 2050 

2190 REM ***** SALTO ***** 
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2200 STRI6CnOFF:STRIGC0DOFF:lF P=0 OR P 
= 2 THEN IF Y=94 THEN STRIGC 1D0N :STRIGC03 
ON:GOTO 2050 

2210 Al=5 tA2=6 : A3=l? :T=X-8 *C=2 *PUT SPRIT 
E 14.C255.191."). 1.4 

2220 FOR N=0 T05:X=X+5:v=Y-7:PUT SPRITE 
10. C r. Y3.6. A:PUT SPRITE 1 1 . CX-8. Y+163 . 15 
,Al:PUT SPRITE 12, CX+8. Y+163 . 15. A2 :PUT S 
PRITE 13. CX-8.Y+32). 15. A3 :T=X-4 :NEXT N ¡T 

=X-4 

2230 IF X>200 THEN X^200 :Y=135 :T=X-8 :GOT 
O 2050 

2240 IF p=0 GR P=2 ORP=l 1 Th'ENIF X>120 ftN 

O Y<135 THEN Y -94 :T-X-8 :GOTO 2320 

2250 IF P=l THEN IF X<120 AND Y<135 THEN 

Y=94:T=X-&:G0T0 2320 
2260 IF P-- THEN IF X<130 AND Y<135 AND 
Y>90 THEN Y=94:T=X-8:G0T0 2320 
2270 IF P=4 THEN IF X<130 AND X<94 THEN 
P=2:SCREEN 0:SCREEN 2:G0T0 130 
2280 IF P=4 THEN IFX>130 AND v<i35 THEN 
Y=110:T=X-8:GOTO 2320 
2290 IF P<>6 THEN GOSUb 380 
2300 FOR N=0 T05:X=X+5 :Y=Y+7:PUT SPRITE 
10. CT.YD.6, A-.PUT SPRITE 1 1 . CX-8. Y+16D . 15 
,Al:PUT SPRITE 1 2. CX+8. Y+16D . 15. A2 :PUT S 
PRITE 13.C-X-8.Y+32D. 15,A3:T=X-4:NEXT N: t 
=X-8 

2310 PUT SPRITE 14, C255, 191"). 1.4:IF P-6 
THEN IF X>200 THEN P=12:SCREEN 0:SCREEN 
2: GOTO 130 

2320 COLOR 1 :PRESETC 1 10. 4D :PRINTttl , Ul :CO 
LOR 6:U1=U1 -1 :PRESETC 1 10. 4 3 :PRINT#1 ,U1 : : 
F Ul-<0 THEN GOSUB 290 :SCREEN 0:SCREEN 2 
:P=P:Ul^6:U^U-l :BM :GOTOl30 
2330 STRIGCnON:STRIGC03ON:FOR N---0 TO 3: 
BEEP:PLAY'V15o2b" :NEXT N 

2340 Ai-1 :A2=2:03=3:A4=4:C=1 :r^X:GOTO 20 
50 

2350 DATA 5. 10, 21 . 0. 21 . 42. 85'. 42. 85. 43. 85 

,43.21. 11.5.3.80, 168.80.0,248.200,254.25 

4.248. 192. 192.248.248.240, 192. 128 

2360 DATA 0.0.0.0.1.3.3.1,1.0.0.0.0.0.0. 

0, 15.63. 127. 255, 255, 223, 223, 255, 251. liP, 

26,21.31.0,63.63 

2370 DATA 192. 224. 240, 252, 255. 255. 255, 2'- 
1 . 240, 224, 224, 240, 240, 0, 248. 248. 0. 0.0.0. 
245,250,245, 226. 128.0,0,0,0,0,0,0 
2380 DATA 0,0,0,0,0,0,1.7.15,31.63.126,2 
52.80. 170,85.63. 127. 126. 124.252. 248.248. 
240.240,224, 128,0.0.0.0.0 

2390 DATA 252.254.63.31.15.7.3.1.3.7.15. 

31.63,20,42,21.0,0,0, 128, 192. 224, 240, 24P 

,240,224.192,128.0, ,128,64 

2400 DATA 7. 15,31.63.63, 127.255,25. .255. 

127.63.63.0,31 .63.63. 128. 192.224,240,25'- 

.255.255.234,215,233.248, 240.3.255.255,2 

55 

2410 DATA 0,0,0,0,254,253.254,253.192.0. 

0,63.255.255.255. 255.0,0,0,0. 128.0. 128. P 

.8. 16,8.208.232.208.232. 192 

2420 DATA 63.31.7,3.1.1,3.7.15.31.63.63. 

63. 20, 42, 21 . 255, 252, 240, 240, 248, 248. 240, 

224, 192, 128.0,0,0,0, 128,64 

2430 DATA 0.0,0,0,56.108.199,131.130,198 

, 108, 56, 0,0, 0,0, 0,0, 0,0, 0,0, 255 , 255 ,27.2 

7.27.0,0.0.0,0 



2440 DATA 0,0,0,0,0.0,0.0,0,4,1-1,27.30.2 
5-, 125. 255. 0.0. 0.0.0-, 0.0.0.60. 1 16.222.24? 
, 184, 239, 251 . 255 

2450 DATA 0.0.0.0.15.15.63.127.255.255.1 

93.255.201.201 .255, 127.8.8.8.8.200.200,2 

00.254,255.3.3,3.3.3,255.254 

2460 DATA 0, 0, 0, 7, 63. 1 19, 223. 125, 254. 25' 3 

.255.254.253.251.247. 127. 127.65. 193.255. 

253. 251 . 247. 239. 95. 191 . 95. 239, 247. 251 . 25 

3.255 

2470 DATA 252.158.207.239.255.79,103.11° 
.63.63.51.25.29. 15. 15. 15.255. 127.63. 159. 
207. 230, 24.2. 248, 252. 252. 252. 248. 248. 240. 
240. 240 

2480 DATA 0,0,1.1.2.5.11.22.47.127.255.1 
70. 17P. 170. 170, 170. 15. 125. 143.234.219. 18 
2. 109.219.247.239.255. 170. 170. 170. 170. 17 
0 

2490 DATA 240.254.239.181.218.237.118.18 
7.221.238.255. 170. 170, 170. 170. 170,0,0, 12 
6. 128. 192.96. 176,216,236.246,255, 170, 170 
. 170, i 70, 170 

2500 DA r A 31.31.25,23.20.21.21.21.21.20. 
23.25.31.31.31. 15.240,240.240.240,80.80. 
80.80,80.80. 208. 208. 240, '.40, 240, 224 
2510 DATA 0,0.0,127.234.245.250.250,250. 
250.250.250.250.250. 122.58.0,0.0,252. 170 
, 84 . 1 70 , 1 70 , 1 70 , 1 70 , 1 70 , 1 70 , 1 70 . 1 70 . 1 70 . 
1 70 

2520 DATA 63.31.63.63.126.126.254.255.25 

5. 127.31.7.0,0,0,0,255.252. 192. 0. 0, 0, 0. 1 

28.208. 160.208. 160. 144,32. 16,0 

2530 DATA 0,0.0.0,0.0.0.0.2.5.2,5,10,4,8 

.0.63.63.31.7.3. 12.31.63, 126.253.251.247 

.242.5.2.0 

2540 DATA 1.3.7.3.7.5,9,18,34,36,32,16.8 
.4.3.0, 128. 192. 224. 192.224, 1 60, 144. 72, 68 
. 36.4.8. 16,32. 192.0 

2550 DATA 0.0.3,67.175.75.171.79.170,69. 

170,64.42.5,2.0.0.0.0.0. 136. 140, 140.255. 

255. 127. 171 .84, 170,84. 160.0 

2560 DATA 0.0,0.0,0,0,31.127.255,227.221 

.222.231 .251. 124.7.0.0,0,0.3. 123.251 .251 

.251.251.255. 11.247.235. 15.251 

2570 DA r A 0,0.0,0,1.3.7,15.255.254,252,2 

40.255.255.255.65.0,0.0,0,0, 128. 192.224. 

24 l . 250. 121 . 2. 253. 250. 253. 250 

2580 DATA 7. 15. 14. 14, 10, 10, l!. 15.7.0,0.0 

.0.0.0,0, 131. 195,231.255.255.255.234. 199 

131,3,3.7.7.7,7.3 
2590 DÁ r Á 192.224,224.224.224,224.192.22 
4.22¿. 192.224,224, 192.224,224, 192.0.0.0. 
0.0,0,0.0.0,0,0,0,0,0,0,0 

2600 DATA 192.224,240,248.248,249.250,25 

3. 250. 240, 240, 248. 248.0. 252.252.0,0,0.0. 

0.0, 128,0. 128. 0.0, 0,0. 0.0.0 

2610 DATA 240.248.252.254,255,255,127.12 

6.252.248.240.224, 1 28. 80 . 1 68 . P . 0. 0. 0. 0. 0 

,0.0.0,0,0,0,0.0.0,0,0 

2620 DATA 192. 224, 240, 240. 248. 24b, Í352. 25 
4. 255. 255. 255. 247. 243. 0. 248. 248. 8. 20. 40. 
20.60.60. 124.248.2*40,224. 192, 1 28. 0, 0, 0, 0 

2630 DATA 0.57.127.127.127.63.63.127.127 
. 127. 127.63. 127. 127.61.0,0,60,254.254.24 
8. 252., 254. 254. 252. 252. 254, 254, 254. 254, 28 
.0 
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2640 DAT A 0,0,17.25.25,25,25.13.103.119, 
63.31. 15.7.3.0.0.0.0,4. 140, 140. 140. 153. 1 
79.230. 252.248.240.224,224. 192 
2650 DATA 0.7.11.19,35.75,91.67.127,127. 
127.63.31.7.7.0,252.252. 128. 190. 170, 170. 
170. 170. 170. 170, 190. 128.255.254,252.0 
2660 DATA 3.6.6.10,11.11.11,11,15.131.12 
7.31. 10. 10.7.63.240. 168. 171.239.239.239. 
239.239,239.239. 175. 175, 1 71 . 1 71 , 248. 254 
2670 DATA 63.31.10,10,10.10,10,10,31.51. 
104.94,51 D. 12.0,254,252, 172. 172, 172, .17 
2. 172. i "4.255. 243. 237. 222. 51. 30. 12.0 
2680 RE!1 ***** PRESENTACION ***** 
2690 COLOR .1.1 

2700 STRIGC0DOFF :STRIGC 1 JOFF :3CREEN0:SCR 
EEN2:KEY0FF:CLS:C=15 

2710 DATA 200,100.100,200,23,23.73,56,56 
,0,0,0, 13. 14 : RESTORE 2710:FQRN^0 TO 13:R 
EAD D:SOUND N, D :NEXT N 

2720 PSETC20. 10] :DRAU"c=c :d50r5u 20f 20r5h 
25e2515g20u2015" :PSETC60, 10) :DRAU)"c-c 515 
g27e27r5f 2715h 10128 9 13" : PSETC 35, 153 :DRAud 
"c=c ;g5rl5h515" 

2730 PSETC60.283 :DRAUTc=-c :d40r7u30rl0f 30 

r5h30" :PSETC60, 103 :DRAUJ"c=c ; r25f 7d7g9" :p 

SETC70, 153 :DRAU"c=c ; r7f 5d2g5h7 u 4" 

2740 PSETC 120, 103 :DRAUI "c=-c 1 15g27e27r5f 27 

15h 101 28g 13h5" : PSETC 1 15,153 :DRAUÚ"c=c :g5r 

15h515" 

2750 PSETC 140, 103 :DRAud"c^c :u31 50u5r80d51 

25d23h5ul4" :PSETC 150, 123 :DRAUd"c=c Íd25r38 

U5125u5r20u5120u5r25u5130" 

2760 IF C=15 THEN 2770 EL SE 2790 

2770 PAINT C22, 123.C:PAINT C60. 143 . C :PAI 

NT C63.303.C:PAINT C63. 123 . C :PAINT C122, 

133,C:PAINT C 1 ¿0, 63 . C :PAINT C 153. 143.C 

2780 C=l :GOTO 2720 

2790 LINE C130.503-C200.703.2.B:PRESET f 
140,553 :COLOR 15 :PRINT#1 . "NIGHT" ;L INE fl 
5,03-C255,753,2,B:PRESET C 21 0.603 :COLOR 
6:PRINT#1. "D.G.C" :X=180 :v=9B :¿U = 1 :A2=25: 
A3~ 1 8 : A4 = 26 : T=X+8 : C 1 •- 1 5 : B 1 -2 : GOSUB 3 1 70 
2800 PRESETC30, 853 :COLOR 10 :PRINT#1 . "OPC 
IONES" :PRESETC30, 1003 rPRINTttl , "* INSTRUC 
C IONES" :PRESETC30, 1 153 :PRINT#1 , "* JUGAR" 
:PRESETC30, 130 3 :PRINT#1 . "* TIN" :L INE C 160 
,773 -C255, 1853. 2, B 

2810 LINE C165. 1503-C250. 1 80 3 , 2, B : P^FSFT 
C 175, 160 3 : COLOR 9:PRINT#1. "D.G.C" : r - sGoE 
T C30. 1453 :COLOR 1 0 : PR I NT* 1 . " * PUNTUACIO 
N" :PRESET C30. 1603 :PRINT#1 . "* DEHOSTRACI 
ON" :PRESETC30. 1753 :C0L0R9 :PR I NT* 1 . " F \ , F2 
,F3.F4,F5" 

2820 ON KEY GOSUB 2850,2830,2840,3040,31 
30:FORN=1TO5:KEYCN3ON:nextn :GOTO 2820 
2830 BEEP:P=0:U=3:S=12:U1=6:B=! :uj--l :V2=1 
35:SC=0:GOTO130 
2840 END 

2850 REM ***** INSTRUCCIONES ***** 
2860 LINEC 15.773-C255. 1913, 1 ,BF:PUT SPRI 
TE 0,-C255, 1913. 1 :PUT SPRITE 1.C255.191 3: 
PUT SPRITE 2. C255, 191 3 :PUT SPRITE 3, C255 
. 191 3 :PUTSPRITE 4.C255. 1913 
2870 PRESETC30. 853 :PRINT#1, " INSTRUCCIONE 
S" :PRESETC20. 1003 :PRINT*1 , "Bob , e 1 karate 
ka, ha estado de uacac ¡onos.lientr 

as su enemigo. hd instalado trampas 



_ 



y robots en casa de BOB. 
2880 PRESE T C 20 , 1 33 3 : PR INTtt 1 . " T u misión © 
s llega r al tatami para encontrar el ma. 
ndo -bomba ,y asi acabar con tu enem 

¡go. Hay objetos, que te ayudan, pero ot 
ros que no sirven Dará nada." 
2890 IF INKEY$=" "THEN GOTO 2900 ELSE GO 
TO 2890 

2900 LINEC0.773-C255, 1913. l.BF:PRESET C3 
0.853 :COLOR 7 :PRINT#1 , "COMO MATAR ROBOTS 
" :COLOR 10:PRESETC20, 1003 rPRINTttl, "Para 
matar robots, tienes dos go Ipe s : ' : p RESE 
TC30, 1 183 :COLOR 9 :PRINT#1 . " 1 3 MAE-GFR I ,: : 
PRESET C 30 . 1 30 3 : PR I NTtt 1 , " 2 3 YOKO -tob I -GFK 
I " 

2910 COLOR 10 :PRESETC20, 1453 :PRINT#1 . ,: P i 
ensa qu-e uno de los dos da mas puntos 
que el otro. y que si te pones en pos i 
c ion DEFENSA, no te ocurre nada .Pero 
te qu i tan puntos " 

2920 IF INKEY$=" "THEN GOTO 2930 FL SE GO 
TO 2920 

2930 LINEC0.773-C255. 1913. l.BF 
2940 PRESET C 30, 83 3 :PRINT#1 , ,: *En el pas i 1 
lo hay puerta late ral " :PRESETC30 

, 1003 rPRINTttl . "*En el refugio hay comida 
'' : PRESET C 30, 1 173 :PRINT# 1 . ,; *Para salir- de 
1 sótano pasar por la ventana" 

2950 PRESET C30, 1343 :PRINT#1 , "Hay 13 hab 
itaciones.y en la mayoría hay robo 

ts." 

2960 PRESET C30. 1573 :COLOR 7:PRINT #1,"* 
*Solo existe una forma de llegar d i r e 
ctamente al TATAMI. ten i endo . c i e rto o- 
bjetc.y estando en el refugio **" 

2970 IF I NKEY$ - " "THEN GOTO 2980 ELSE GO 
TO 2970 

2980 LINEC0.773 -C255. 1 91 3 . 1 , BF :PRESET C 30 
,853 :C0L0R 10 :PRINT#1 , "Hay cuatro pisos, 
y el TATAMI esta en l.o mas alto" JPRES 
ETC20. 1153 :COLOR 9 :PRINT# 1 . "En el pasill 
o. el suelo es cor redigo, y se avanz 

a muy de s pac i o " 

2990 IF INKEY$ - " ''THEN GOTO 3000 ELSE - GO 
TO 2990 

3.000 LINEC0.773-C255. 1913-, 1 , BF :PRESET r 30 
. 1103 :C0L0R 9:PRINT#1. "*****EL.IGF******' : 
PRESET C30, 1253 :PRINTttl. "13" JOYSTICK" :PR 
ESETC30, 1403 :PRINT#1 . "23 KEYBOARD" 
3010 IF INKEY$- " 1 " THEN Jl~-1 :GOTO3030 
3020 IF INKEY$-"2"THEN J1=0 EL SF GOTQ 30 
10 

3030 B=i:LINE C0, 773 -C255. 191 3 . 1 , BF :GOTfi 
2800 

3040 LINEC0.773-C255. 1 91 3 , 1 . BF : PRESET C 50 
. 1003 :PRINTttl . "PUNTUACION" : p RESETf 60, 1 ' S 
3 :PRINT#1 . :SC 

3050 PRESET C 30. 185 3 :PRINT#1. " i Pulsa U b 
arra espac i ado ra3 " 

3060 IF INKEY$=" "THEN LINEC0.773 255,1 
913. l.BF :GOTO 2790 ELSE GOTO 3060 
3070 COLOR .1.1 

3080 STRIGC03OFF:STRIGC13OFF:SCREEN 0:CL 
SrUIIDTH 20 

3090 L0CATE3,5:PRINT"KARA.TE NIGHT" :LOCA t 
E 4,7:PRINT"Por D.G.C" : LOCATE 2,10:PRIN'r 
"Lo has logrado. con el mando -bomba. que 
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puedes acabar 



tienes Ahora 
con tu enemigo.'' 

LOCATE 1. 20 :PRINT"C Pulsa 







3100 
3 " 

3110 
"Tus 
3L20 



la tecla p 



SC=SC + 2000:COLOR 2:L 0CATE2. 16:PRINT 
puntos : " :SC 

I F INKJE Y$ : - » p " OR I NKEY$-- " P " THENRUNELS 



'ÍGOTO3120- 
3130 REM-***** demostración ***** 
3140 DATA 200.255,100.100.233.34,123,25. 
34.57.0,0. 100. 14:RESTORE 3140 :PORN=0TO 1 
3 :READD :SCAJND N, D :NEXT N 
3 i 5*0 'LINEC0, 77 3 -C255, 191.1, l.B^LINE C15. 
77 3 -C 155, 1853 , 2. B :L INEC 160, 773 -C 255, 1853 
, 2,B :X=50:y=i 10 :t=x+8 :A1«! : A2=2 : A3=3 : A4= 
4:Cl--15:Bl-vl :L INEC165. 142 3-T250. 180 3.2.B 
'.PRESETC170. 1503 :COLOR 10 :PRINT#1 . "D. G. C 

3160 PRESETC40, 903 :C0L0R7 :PRINT#1 . "DEMOS 
TRAC I ON'" :LINEC20, 1603 -C150, 1803, 2, B 
3170 PUT SPRITE 0, C T , V 3 . 8, 0 :PUT SPRITE 1 
, CX. Y H63 . 15. Al :PUT SPRITE 2, CX+16, Y+163 
,15.A2:PUT SPRITE 3. CX, Y+323 . 15, A3 :PUT S 
PRITE 4, CX+16, Y+323 . C1.A4-.IF Bl-2 THEN R 
ETURM 







3180 LINEC165.953-C240. 140 3., 1 , BF : PRESET C 
170. 1003 :PRINT#1 . "NORMAL" :FOR N=0 TO 700 
:NEXT n 

3190 01=2:pl-i :T=X:A1=5:A2=6:A3=7:LINEC1 
55,95 3 -C 240, 1403. 1 , BF :PRESETC 170, 1003 :PR 
JNTttl. "MAE-GERI" :GOSUB 3170:PORN=0 TO 70 
0:NEXT N 

3200 A3-17:l INEf 165, 953 -f 240, 1403, 1,BF:P 
RESFrci70. 1003 :PRINTttl. "YOKO-TOBI" :PRESE 
ff 170. 1153 :PRINT#1. "GERI " :GOSUB 3170:FOR 
N-0 TO 700ZNEXT N 

3210 A1--1 :A2^25:A3--13:A4^26:T=x+8:Cl = 15: 
L INEf 165, 35 3 -C 240, 1403. 1 . BF :PRESET Cl 70. 1 
00 3 :PRINT#l . "CAMINANDO" :GO^UB 3170:FORN= 
0 TO 700:NEXT N 

3220 Al-t :A2--27 :A3--3*.A4=.4 :r^x+8:Cl = 15:LI 
NEf 165.953-C240, 1¿0 3 . l , BF : PRESET C 170, 100 
3 tPRINTMl. "DEFENSA" :GOSUB 3170 :FORN=0TO7 
00:NEX^N 

3230 PRESETC23. 1633 :COLOR 10 :PRINT#1 . " CP 
ulsa la p3" 

3240 K$--INKEY$:IF K$^"p" OR K$="P." THEN 
COLOR 1 :p"OR N^0 ÍO 4:PUT SPR I TEN, C 255, 1 9 
13.1 :NEXT N-.L INEC 0,77 3 -C255. 1913. l.BF:GO 
TO 2790ELSE GOTO 3240 
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Manhattan Transí er , SJL 
Formato: cassette 32K 
Mandos: teclado o joystick 
Teclee: LOAD «CAS:», R 



Sonido: Adecuado 
Gráficos: Buenos 

Conclusión: Su sencillez es su 
gran atractivo. Crea afición y... 
desesperación. 



PING PONG 



KONAMI SERMA 
FORMATO: cartucho ROM 
MANDOS: i 



Las apariencias enga- 
ñan y en el caso de S na- 
fre mucho más. Prime- 
ro este Juego aparece como 
muy sencillo y argumenta! - 
mente lo es. Se trata de que 
Snake coma una serie de nú- 
meros y evite chocar con los 
muros y llegar tarde al objeti- 
vo, porque el número inicia su 
cuenta atrás y el cero es mor- 
tal. Sin embargo, esta sencillez 
se torna en dificultad a medida 
que Snake, la serpiente que al 
principio sólo muestra su ros- 
tro goloso, va comiendo tam- 
bién crece su cuerpo y sus mo- 
vimientos se hacen cada vez 
más torpes. Al mismo tiempo 
los números van apareciendo 
en distintos lugares y con ma- 
yor velocidad, lo que sumado a 
la «gordura» de Snake y a los 
nuevos peligros que se inter- 
ponen en su camino el panora- 
ma se complica muchísimo. 
Además, Snake tampoco puede 
volverse sobre su propio cuer- 
po, ya que el veneno de sus col- 
millos se torna fatal contra 
ella misma. Apenas comiences 
tienes que estar muy atento 
porque Snake, con su tremen- 
da gula, sale disparada hacia 
cualquier parte y si tu capaci- 
dad de reacción no es lo sufi- 
cientemente rápida lo más 
probable es que la serpiente 
vaya a dar contra el muro elec- 
trizado más próximo. 

Snake tiene salidas por el 
cerco, de modo que si quieres 
pasar de un extremo a otro, 
sólo tienes que conducirla a 
través del pasadizo que hay en 
los lados izquierdo y derecho. 
Es el modo de ganar tiempo y 
evitar que el campo se le llene 
de cruces mortales, que dificul- 
ten aún más sus andanzas de 
glotona. 
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Si eres aficionado al ping- 
pong lo puedes practicar 
tranquilamente desde un 
cómodo sillón, sin perder, cla- 
ro está, la emoción del juego. 

Tú eliges; si crees ser lo sufi- 
cientemente bueno te aconsejo 
comprobarlo enfrentándote a 
la computadora. Para ganarle 
debes tener buenos reflejos y 
gran habilidad en el manejo de 
las palas. Si no crees dominar 
bien estas dos cualidades, bús- 
cate un compañero que esté a 
tu nivel -tendrás más posibili- 
dades de ganar-. Un partido 
consta de 3 Juegos y el primero 
que consiga 21 tantos gana el 
juego, pero el partido lo gana 
quien más Juegos tenga a su fa- 
vor. 

... Y comienza el partido: 
Cada Jugador tiene 5 saques, 
si los practicas bien podrías 
ganarle un punto a tu rival por 
cada saque, por el contrario, 
por cada saque nulo será tu 
compañero el que gane el tan- 
to. 

El público será un gran ani- 
mador durante todo el partido 
para los dos Jugadores. Sus 
aplausos y silbidos se dejarán 
oír en cada tanto. Con respecto 
al manejo de las palas no debes 
preocuparte, sólo has de mo- 
ver la palanca del mando para 
golpear la pelota teniendo así 
un dominio del disparo. Las 
posibilidades son: 

-disparo con gran potencia 
y rozando la red. 

—disparo alta y suave. 

—disparo con efecto, etc. 

¡Pero cuidado! si tus cálculos 




POR: 

CLAUDIA TELLO HELBLING 



te fallan, la pelota podía salir 
fuera y si el otro Jugador no la 
toca, el tanto seria para él. En 
los saques has de dirigir la pa- 
lanca hacia delante y seguida- 
mente a un lado. ¡Suerte! y que 
gane el mejor! 



Sonido: Muy real 
Grafismo: Bueno 
Conclusión: Un juego super 
entretenido y de gran verismo. 
Precio aproximado: 5.300 pts. 
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EL SECRETO DE 
LA PIRAMIDE 



Manhattan Transfer, 

Formato: cassette 32K 
i: teclado 



La pirámide de Amenho- 
tep IV, también conoci- 
do como Akhenaton, 
guarda en sus laberínticas 
profundidades un gran tesoro 
que tú puedes llevarte. Sin em- 
bargo, antes tienes que avan- 
zar por corredores donde los 
peligros son constantes y tam- 
bién las sorpresas. En alguno 
de ellos te encontrarás objetos 
que te servirán para alcanzar 
tu objetivo. Claro que no debes 
perder de vista que para lo- 




YOU 




grarlo tienes antes que acce- 
der a claves que te Irán abrien- 
do poco a poco los secretos que 
esconden arcones, cofres, sar- 
cófagos. Muchas veces, y os co- 
mento a modo de pista, ten- 
drás que ir y venir por las mis- 
mas habitaciones, abrir puer- 
tas, hacer ofrendas, contestar 
enigmas, subir y bajar por 
aberturas, sin olvidar que las 
cosas no se hacen como las 
imaginamos sino como son. 
Por ejemplo, no puedes exami- 
nar un cubo, sin antes cogerlo, 
ni subir o bajar a una depen- 
dencia si no cuentas con una 
soga o una escalera. 

Otra cosa que tienes que te- 
ner en cuenta es que hay una 
lista de verbos que puedes uti- 
lizar. Trata de ser preciso en 
tus órdenes y no coloques es- 
pacios de más, pues el ordena- 
dor no te aceptará lo escrito. Si 
te ves en apuros pide ayuda, a 
veces el ordenador te dará al- 
guna pista, pero otras no y 
como tiene un cáustico sentido 
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insertar la tarjeta en el cartu- 
cho. El segundo paso, y con el 
ordenador MSX apagado, in- 
sertar el cartucho en la ranura 
correspondiente. El tercer 
paso es encender el televisor y 
el ordenador y en pantalla 
aparecerá la presentación del 
juego. ¡Que te diviertas en la 
fiesta de Willy! 



del humor se divertirá contigo. 
Otra ayudita que yo te puedo 
dar es que si llevas contigo una 
serie de objetos y necesitas co- 
ger otro y ya no puedes hacer- 
lo, lo mejor es dejar el que 
creas menos necesario, apun- 
tar donde lo dejas, por las du- 
das, y coger el que necesitas en 
ese momento. A medida que 
vayas jugando descubrirás que 
el desafío es grande y que es 
muy fácil perderse. Por eso te 
recomiendo que a medida que 
avanzas por los intrincados 
pasillos vayas haciéndote un 
plano, algo así como dejar mi- 
gas de pan como Hansel y G re- 
tel. Bueno, no te cuento más y 
que te diviertas, explorador. 



8onido: Apropiado 
Gráfico: - 

Conclusiones: Un juego de rol 
que requiere mucha paciencia y 
capacidad de retentiva para evi- 
tar caer en trampas. Un desafio 
a la inteligencia y sagacidad del 
jugador. 

Pr,clo:7COpta 
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JET SET WILLY 



BEE CAJU)/ 
FORMATO: Tarjeta 







es extravagante y 
rico y su casa una espe- 
cie de complicado labe- 
rinto con sótanos, galerías, 
piscinas subterráneas^ tram- 
pas, etc. por dondé extraños 
personajes y objetos se inter- 
ponen en el camino del dueño 
de casa para evitar que se lleve 
los objetos necesarios para or- 
ganizar una fiesta en la parte 
alta. Incluso, Willy tiene un 
ama de llaves lo suficiente- 
mente protestona como para 
no dejarlo ir a la cama si desea 
hacerlo antes de recoger los 
objetos. 




A través de sesenta panta- 
llas diferentes tienes que de- 
mostrar muchísima habilidad 
para conducirlo a buen cami- 
no. Dado que este juego es su- 
mamente popular y muchos de 
nuestros amigos ya lo conocen 
no abundaré en detalles. Lo 
importante ha, sido reseñarlo 
porque es el primero que se co- 
mercializa en versión Tarjeta 
Inteligente en España. Por 
este motivo Junto con la tarje- 
ta también se incluye el cartu- 
cho adaptador —el Bee Pack— 
que servirá para insertar en el 
ordenador no sólo a Jet Set Wi- 
lly, sino a todas las próximas 
Bee Card. 

Para que no tengas ningún 
problema en cuanto a su em- 
pleo, ten en cuenta que lo pri- 
mero que tienes que hacer es 



Sonido: Monótono 
Qrafismo: Excelente 
Conclusión: Un juego apasio- 
nante por la cantidad de panta 
lias que ofrece y la originalidad 
de las situaciones. 
Precio Aproximado: 8.500 
pts. (incluido Cartucho Adapta- 
dor) 
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uper Cobra será tu apodo q g 
si tienes éxito en esta pe- n ¿ 
ligrosísima misión. Con- Q $ 
siste en atravesar todo el cam- 
po enemigo con un helicóptero 
equipado de bombas y misiles 
para tu defensa. Ya que al- 
guien ha dado el chivatazo y te D % 
espera con todo su armamento: D g 
misiles que dispararán cuan- □ £ 
do menos te lo esperes, ovnis □ :•: 
que irán a tu encuentro, caño- □ § 
nes muy bien camuflados en- □ j:¡ 
tre el paisaje rocoso, etc. Para □ 8 
conseguir combustible se lo □ :•: 
tendrás que robar al enemigo: □ 
los tanques de combustibles □ •: 
irán apareciendo a medida que q § 
avances, pero pon mucha q :' : 
atención ya que estos están se- ,-, x 
miocultos entre las rocas y es n 
muy difícil acertarles con el : :; 
disparo sin estrellarte contra :•: 
alguna saliente de dichas ro- ^ ':• 
cas. En caso de haber apunta- D i; 
do con precisión y el disparo es 1=1 : ; 
positivo, tu depósito se llena- ^ 
rá. □ i« 

El camino a recorrer es muy □ 
largo y además a medida que □ |¡ 
avanzas los peligros a los que □ '¡ 
te has de enfrentar son mayo- □ ': 
res. □ • 

El dominio del helicóptero □ ; 
es muy importante para obte- □ 
ner éxito en esta misión: pue- q : 
des dirigirlo hacia adelante, c ■ 
arriba, abajo y de tenerlo un _ ¡ 
instante en caso de no poder : 
avanzar, pero, atención, un de- ¡r* 
talle a tener en cuenta. ¡Nunca — 
podrás retroceder! 

Por cada cañón, ovni o tan- 
que que tú derribes la compu- 
tadora aumentará tu puntaje. 
Y ahora, después de estas ins- 
trucciones, muchachito, ¿te 
apuntas a esta misión? 



□ : 
Di 

□ ; 

□ : 
□ 

□ : 

□ : 




Sonido: Acertado 
Graflsmo: Preciso 

Conclusión: Este es uno de los 
juegos de mayor éxito de Kona- 
mi por la diversidad de situacio- 
nes a medida que se avanza. 
Precio aproximado: 5.300 pts. 



QQQQQQQQ 



□□□□□□□□□□□□□□□□□□□□□□□□□□□□□□□□□□□□□□□□□□□□□□□□□□□□□□□□□□□□□□ 



□ $m 

□ $m 

□ $B 
□ 

□ : $m 



INICIACION AL LENGUAJE MAQUINA 



DEL HARD AL SOfJ 



RUTINAS DE BIOS 



En nuestro número extra de Navi- 
dad incluíamos un pequeño lis- 
tado de rutinas ROM que podría 
ser de utilidad para nuestros lectores. 
Hoy explicaremos algo más en profundi- 
dad alguna de ellas, empezando por la 
rutina 00D5, que como ya hemos dicho 
examina el estado del joystick. 

Antes de empezar recordaremos que 
todas estas rutinas en código máquina 
que están a disposición del programa- 
dor avanzado de MSX se denominan 
generalmente con el nombre de BIOS 
(Basic Input Output System) y son es- 
tándar en todos los MSX, con alguna 
salvedad que estudiaremos en su mo- 
mento. En resumen estas rutinas BIOS 
son pequeños programas en código má- 
quina que utiliza el ordenador para tra- 
bajar y que nos son accesibles mediante 
la instrucción CALL. Sin embargo, en al- 
gunos casos es necesario que sepamos 
donde debemos depositar los datos con 
los que operará la rutina, así como en 
qué lugar (registro de datos) colocará el 
resultado, nuestra rutina. 

Decíamos en nuestro anterior artícu- 
lo, que la rutina BIOS que se encuentra 
en la dirección 00D5 examinaba el esta- 
do del joystick. Pues bien para hacerla 
funcionar es necesario en primer lugar 
colocar en el acumulador un valor de- 
pendiente del joystick que queremos in- 
vestigar. 

PARA INVESTIGAR 
el teclado 
joystick 1 
joystick 2 

Introducimos en el ACUMULADOR 
0 
1 

2 

A continuación ejecutamos la rutina 
mediante un cali 00D5 y cuando leemos 
de nuevo el registro A nos encontrare- 
mos con que el acumulador contiene un 
valor de 0 a 8 que nos indica lo siguiente: 

0 ningún movimiento 

1 hacia arriba 

2 hacia arriba a la derecha 
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3 hacia la derecha 

4 hacia abajo a la derecha 

5 hacia abajo 

6 hacia abajo a la izquierda 

7 hacia la izquierda 

8 hacia arriba a la izquierda 

Esto nos plantea diversos problemas, 
primero esta rutina necesita que colo- 
quemos en el acumulador un valor, no- 
sotros utilizaremos el 0, pues vamos a 
leer el estado del cursor, para ello debe- 
remos utilizar el nemónico de assembler 
correspondiente LD A, 00 carga 0 en el 
acumulador cuya traducción a hexade- 
cimal es 3E 00 y a continuación pode- 
mos ejecutar la FUNCION USR desde el 
BASIC (naturalmente ahora has de pul- 
sar alguna de las cuatro teclas de cur- 
sor, pues sino no sabrás si te ha funcio- 
nado la rutina). Seguidamente, repesca- 
mos el valor que contiene actualmente 
el acumulador mediante una instrucción 

LD (dd), A 
donde (dd) es una dirección de memoria 
de 2 bytes que esta libre para usuario 
(normalmente se utiliza de la 60.000 
para arriba, naturalmente en decimal). 

Luego tan sólo tendrás que leer esa 
dirección de memoria mediante un 
PEEK y te dará el valor correspondiente 
al cursor o cursores pulsados. 

Naturalmente este sistema es bastan- 
te engorroso, pues pasamos del BASIC 
a MLP dos veces, con lo que perdemos 
la presumible velocidad del lenguaje 
máquina, pero aquí viene a salvarnos 
una instrucción assembler de gran po- 
tencia, la llamada «cali». 



GALL nn: LA LLAMADA A SUBRUTINA 

Con la instrucción CALL nn: llamamos 
a la ejecución de una subrutina en len- 
guaje máquina desde el mismo lenguaje 
máquina. NN será la dirección de me- 
moria a la que salta el programa, la di- 
rección de la «siguiente instrucción» 
como sabemos se guarda en el conta- 
dor de programa o PC (registro doble de 
dos bytes) pues bien cuando se ejecuta 
un cali este valor se acumula en la pila 
(stack) pasando el valor nn (nueva di- 
rección de la subrutina) a ocupar el con- 
tador de programa PC. 

Cuando se ha ejecutado la subrutina 
la pila o stack debe estar en el mismo es- 
tado que al iniciarse, pues debe encon- 
trar allí la dirección de la siguiente ins- 
trucción a ejecutar tras el salto a la su- 
brutina. Como vemos es muy similar a la 
instrucción GOSUB del BASIC. 

Existen 9 tipos diferentes de CALL 
que veremos más tarde. Ahora simple- 
mente nuestro programa se limita a car- 
gar un valor en A, ejecutar mediante cali 
la rutina BIOS y mover el contenido de A 
a un área de memoria manipulable (nn) 
por ejemplo: 

LD A, 00 
CALL 00D5 



LD (nn), A 

Luego sólo tendremos que leer el con- 
tenido de (nn). Si traduces todo esto a 
nemónicos (encontrarás la traducción 
de las instrucciones cali a Hexa en la ta- 
bla núm 1.) y lo introduces notaras la 
gran rapidez de esta rutina. 

Algunos Assamblers (como el recien- 
temente aparecido de Sony) permiten 
hacer CALL a subrutinas de la ROM 
BIOS sin necesidad de saber su direc- 
ción de memoria, simplemente con una 
etiqueta con el nombre clave que tiene 
cada rutina de la ROM BIOS esta rutina 
se denomina en nombre clave GTSTCK 

RUTHÍ6TTRI600D8 

Esta otra rutina que encontramos a 
continuación en el mapa de memoria 
funciona en todo como la anterior, se en- 
cuentra en la dirección 00D8 y se encar- 
ga de controlar el disparador, primero se 
introduce en el acumulador un valor de 0 
a 4 según queramos investigar: 

0 barra espaciadora 

1 disparador 1 A 

2 disparador 2A 

3 disparador 1B 

4 disparador 2B 



el contenido del acumulador en la salida 
es de 0 si no se ha pulsado el disparador 
y de 255 si se ha efectuado un disparo. 
El programa para comprobarlo será en 
todo simular al anterior. Estas dos ruti- 
nas varían los posibles contenidos de 
los registros AF BC DE y HL por lo que si 
los utilizábamos en nuestro programa 
en MLP será necesario salvarlos en 
áreas de trabajo previamente seleccio- 
nadas (direcciones de memoria accesi- 
bles al programador). Cuando utiliza- 
mos estas dos rutinas será muy útil colo- 
car bucles de retardo pues si no la gran 
rapidez de las rutinas puede ser un in- 
conveniente, aunque este será un pro- 
blema con el que sólo se encontrarán 
los programadores avanzados, por lo 
cual no entraremos en detalles aún a 
este respecto. 



MAS RUTINAS UTILES 

En la misma línea que las rutinas an- 
teriormente descritas nos encontramos 
con otras dos que no fueron publicadas 
en nuestro extra de Navidad, y que son: 

GTPAD en la dirección 00DB 

que nos devuelve el estado de uno de 
los tableros gráficos conectados al port 
dejoystick. 

Introduciendo en el acumulador un 
valor de 0 a 3 la rutina nos devuelve el 
estado del port 1 de joystick, con un va- 
lor de 4 a 7 el del port 2 



GTPDL en la dirección 00DE 

esta rutina nos indica el estado de los 
posibles paddles conectados al siste- 
ma, en este caso con un número par in- 
vestiga el estado del paddle asignado al 
port 2 de joystick y mediante un número 
impar introducido en el acumulador lee 
el estado de un paddle asignado al port 
1 de joysticks. El acumulador contiene 
un 0 o 255 dependiendo del estado del 
paddle pedido. Para utilizar esta rutina y 
la anterior es necesario estudiar a fondo 
la instrucción PAD del Basic y de ser ne- 
cesario desesamblar las rutinas y ver 
qué hacen exactamente. 

Esperemos que con estos comenta- 
rios se haya clarificado la utilidad y fun- 
cionamiento de estas rutinas ROM 
BIOS c-ue publicamos en nuestro ante- 
rior articulo, sin embargo el estudio de- 
tallado de cada una de ellas y de algu- 
nas otras que no se publicaron, sería 
tema para muchos artículos, e incluso 
necesitaríamos todo un artículo para 
analizar alguna de ellas. 



TABLA I 



CALLC, nn DCnn 

CALLM, nn FCnn 

CALL NC, nn D4nn 

CALL nn CDnn 

CALL NZ, nn C4nn 

CALL P, nn F4nn 

CALL PE, nn ECnn 

CALL PO, nn E4nn 

CALLZ.nn CCnn 



excepto CALL nn, todas las demás lla- 
madas a subrutina sólo se ejecutan si 
se cumple una condición en el registro 
de Flags (algo similar a la instrucción 
BASIC). IF, Then, ELSE, lo cual será es- 
tudiado en profundidad en el próximo ar- 
tículo. De momento limítate a utilizar el 
nemónico CALL nn CD nn. 

Programa de ejemplo 

10DEFUSRI=60000!:A=USR1(0) 
20 PRINTPEEK(60011!):GOTO10 

Hisoft GEN Assembler. Page 1. 

Pass 1 errors: 00 



en BASIC 



EA60 10 ORG 60000 

EA603E00 20 LD A,0 
EA62CDD500 30 BUCLE: CALL PtD5 

EA65326BEA 40 LD (60011), A 

EA68 B7 50 OR A 

EA6928F7 60 JRZ, BUCLE 

EA6BC9 70 RET 

Pass 2 errors: 00 
Table used:27 f rom 110 



en Assambler 
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COMPACT DISC INTERACTIVO PLAN 
CONJUNTO PHILIPS/SONY 




Philips y Sony anuncian 
sus planes para someter 
las especificaciones para 
las aplicaciones de la CD-ROM 
interactiva. Este formato, lla- 
mado «CD Interactive Media» 
( CD-I), está destinado a su em- 
pleo en el hogar y en la educa- 
ción, e imprimirá nuevos ím- 
petus a las industrias editoria- 
les, de grabación y de software, 
gracias a su amplia variedad 
de aplicaciones y su alto rendi- 
miento con relación al precio. 

En 1980, Philips y 8ony de- 
sarrollaron juntos el sistema 
de audio digital de disco com- 
pacto, y después han comer- 
cializado los productos de este 
sistema en 1982. Desde enton- 
ces, la aceptación que por par- 
te del público han alcanzado 
los Compact Discs y sus toca- 
discos ha ido creciendo sin ce- 
sar. Apoyándose en el éxito del 
pequeño, robusto y flexible dis- 
co, Philips y Sony han ido am- 
pliando sus posibilidades inte- 
ractivas que, como consecuen- 
cia de su enorme capacidad de 
almacenamiento, lo convier- 
ten en un producto ideal, bien 
«per se», bien para su empleo 
como periférico de ordenador. 
Ya en 1983 alcanzaron acuer- 
dos de normalización para CD- 
ROM, con un paso más en el 
perfeccionamiento de la CD- 
ROM en 1985, en que se consi- 
guió establecer el formato físi- 
co que ha llevado a la obten- 
ción de la base para el almace- 
namiento de audio, vídeo y da- 
tos de ordenador en discos óp- 
ticos. 

La nueva especificación pro- 
porciona un formato completo 
que permite un empleo inte- 
ractivo total de la CD-ROM 
para manejar, no ya sólo músi- 
oa y sonido, sino incluso pala- 



bra, imágenes fijas y anima- 
das, gráficos, programas de or- 
denador y datos para éstos. La 
nueva especificación también 
reforzará las posibilidades de 
los ordenadores personales y 
domésticos con información 
fácilmente accesible, de audio- 
visuales, con elevada ecualiza- 
clón. De este modo, Philips y 
Sony esperan que este nuevo 
medio creará muchas oportu- 
nidades para que las indus- 
trias de hardware, software y 
editoriales provean al consu- 
midor con formas realmente 
nuevas de entretenimiento in- 
teractivo y elementos educati- 
vos, desde canciones con texto 
e imágenes hasta diccionarios 
de conversación y enciclope- 
dias, así como otras aplicacio- 
nes que quedan fuera de lo aho- 
ra imaginable. 

La nueva norma CD-ROM, 
«CD Interactive Media» (CD- 
I), asegura el mismo nivel de 
intercambiabilldad que el CD 
digital audio. Por consiguien- 
te, cualquier disco hecho con 
la nueva especificación, lo 
mismo que los normales de au- 
dio CDS, funcionarán en cual- 
quier parte, con cualquier 
equipo basado en el nuevo for- 
mato. Como opción, los toca- 
discos con posibilidades de ln- 
terfaz de ordenador incorpo- 
radas también podrán actuar 
como periféricos para los or- 
denadores personales o do- 
mésticos. 

Philips y Sony creen since- 
ramente que la electrónica de 
consumo y la industria de los 
ordenadores apoyarán las lí- 
neas básicas de este formato 
tan flexible. Los detalles fina- 
les de la especificación del nue- 
vo formato se completarán en 
los próximos : 



DICCIONARIOS 
DE MICRO 
INFORMATICA 

Editados por Noray 

La Editorial Noray acaba 
de lanzar dos dicciona- 
rios dedicados a la mi- 
croinformática con la firma de 
Ramón Tapies, en distintos 
formatos, uno normal y el otro 
mini. El primero recoge el am- 
plio argot tecnológico de la mi- 
croinformática tanto en espa- 
ñol como en inglés. El «Mini 
diccionario microinformáti- 
co» está pensado con el mismo 
criterio práctico que el ante- 
rior, pero con la posibilidad de 
llevarlo en el bolsillo, lo cual lo 
hace especialmente interesan- 
te para los estudiantes. 



OlCCkOnfiRkD 
DE 
miCRD 
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TABLETA 
GRAFICA 
PIONEER 

Un periférico 
interactivo 



La tableta gráfica PX-TB7 
Pioneer y el cartucho 
ROM de vídeo art consti- 
tuyen uno de los periféricos 
más interesantes de MSX por 
sus aplicaciones gráficas inte- 
ractivas. La Tableta Gráfica 
permite un fácil acceso a los 
efectos gráficos y a las órdenes 
«PADíT» y dispone de una 
gran capacidad para la reali- 
zación de gráficos ajumados. 
Su versatilidad le permite 
«pintar» imágenes animadas 
de vídeo. Su sistema gráfico 
también incluye una serie au- 
tomática de figuras geométri- 
cas que permiten interesantes 
combinaciones. Usándolo con 




el cartucho ROM cumple fun- 
ciones de superimpose. En Es- 
paña este periférico Pioneer es 
distribuido por Vieta Audio 
Electrónica, SA_, Bolivla 239, 
Barcelona 08020. 



DISKETTE DE 
SONY 

Modelo OM-D3440 



Los micro floppydisk 0M- 
D3440 de Sony se pre- 
sentan en cajas de diez 
dlskettes. Estos tienen una ca- 
pacidad de 600 kbytes sin for- 
matear y 360 Kbytes Ubres 
una vez formateados. Su tama- 
ño es el estándar de 3,6 pulga- 
das. El precio aproximado de 
este elemento esencial para 
trabajar con unidades de disco 
MSX, es de 9.500 pts. 




BRAZO ROBOT 

Desarrollado por 
Spectravídeo 



Un nuevo y atractivo pe- 
riférico se incorpora a 
la amplia gama que po- 
seen los aparatos MSX. Esta 
vez se trata de un brazo robot 
-Robot-Arma-, que permite 
realizar una serie de trabajos 
muy simples a través de una 
interface especial y un progra- 
ma llamado Rogo. Este inte re- 



sante periférico que aún no se 
comercializa en España, sí se 
vende en Gran Bretaña a tra- 
vés de la famosa Quickshot a 
un precio de 39,96 libras. 



MUSICA Y 
TECNOLOGIA 

Nueva publicación 




A 



caba de aparecer el pri- 
mer número de la revis- 
ta «Música y Tecnolo- 



gía» que trata de responder a 
«las inquietudes musicales» 
tratando de abordar el empleo 
de la tecnología electrónica en 
las «artes del registro de soni- 
do y la composición musical». 
De su amplio sumario pode- 
mos destacar «MIDI: Teoría y 
práctica», «Domando al DX-7», 
«El estudio en casa» «Dígitos, 
Pistas y Pentagramas», etc. 
«Música y tecnología» a la que 
deseamos mucha suerte en su 
andadura editorial, aparece cada 
dos meses y cuesta 380 ptas. 



IDEALOGIC 
PREPARA 
SOFTWARE 
PARA MSX-2 



!!;s::."Ei¡:? «.í: 




Con textos y gráficos de 
alta resolución 

Idealogic se incorpora con 
fuerza a la producción de 
software para MSX. Den- 
tro de esa tónica ya prepara un 
Importante paquete destinado 
al entretenimiento, las utilida- 
des y la gestión. Un equipo Jo- 
ven y altamente cualificado 
trabaja en la creación de pro- 
gramas que supondrán un sal- 
to cualitativo de importancia 
que sin duda animará a otros 
fabricantes del sector. La co- 
lección Telarlum para MSX-2 
es uno de los caminos seguidos 



a ■ 
m ■ 

■ ■na ■ 



por Idealogic para satisfacer 
la cada vez más grande deman- 
da de software para MSX. La 
famosa colección de aventuras 
y cursos de aerobio son ejem- 
plos de su intensa actividad. 



NUEVA TARJETA 
INTELIGENTE 

Producida en España 



Tras el contrato firmado 
por Serma, S _A con Hud- 
son Soft de Japón para la 
importación y distribución de 
la Bee Card, la empresa espa- 
ñola ha llegado a un acuerdo 
con Electric Software para la 
producción en este país de las 
tarjetas inteligentes del siste- 
ma Astron Soft. Estas tarjetas 
-que se comercializarán como 
Soft Card- contarán con su 
propio cartucho adaptador 
dado que por ahora no son 
compatibles entre si. 
Los primeros títulos de es- 




tas tarjetas ya están a la venta 
a un precio aproximado de 
8.500 pts. -incluido cartucho- 
y destacamos 1X2, programa 
dedicado a las quinielas futbo- 
lísticas, QH, dedicado a las qui- 
nielas hípicas, PANORAMA 
PARA MATAR, adaptación de 
la famosa película de James 
Bond.y LE MANS, famoso Jue- 
go de carrera de coches. 



Los señores José Suaxes y Gusíii, de Serma y Hudson Soft en el acto 
de firma del contrato de Importación y distribución de la Bee Card. 





TEST DE LISTADO 



Viene de la pág. 89 



2370 


- 22 


2500 


-112 


2630 


- 33 


2760 


-120 


2890 


- 65 


3020 


-112 


3150 


-145 


2380 


-137 


2510 


- 13 


2640 


-135 


2770 


-Í77 


2900 


-126 


3030 


- 30 


3160 


-163 


2390 


-199 


2520 


-148 


2650 


- 27 


2780 


-191 


2910 


- 95 


3040 


-190 


3170 


-199 


2400 


- 40 


2530 


-138 


2660 


-128 


2790 


-184 


2920 


-125 


3050 


- 76 


3180 


-240 


2410 


- 2 


2540 


-150 


2670 


-168 


2800 


-156 


2.930 


-214 


3060 


-140 


3190 


-221 


2420 


-210 


2550 


- 22 


2680 


- 0 


2810 


- 97 


2940 


-192 


3070 


- 57 


3200 


- 16 


°*30 


- 81 


2560 


-112 


2690 


- 57 


2820 


-157 


2950 


- 34 


3080 


-255 


3210 


-132 


2¿40 


-167 


2570 


- 83 


2700 


-143 


2830 


-183 


2960 


-153 


3090 


- 15 


3220 


-209 


2450 


- 55 


2580 


- 52 


2710 


-168 


2840 


-129 


2970 


-225 


3100 


-228 


3230 


- 43 


2460 


-212 


2590 


-108 


2720 


- 72 


2850 


- 0 


2980 


- 72 


3110 


-120 


3240 


-114 


2470 


- 40 


2600 


-229 


2730 


-178 


2860 


-157 


2990 


- 9 


3120 


-146 






2480 


-203 


2610 


-226 


2740 


-251 


2870 


-136 


3000 


- 80 


3130 


- 0 


TOTAL : 


2490 


- 27 


2620 


-162 


2750 


-216 


2880 


-120 


3010 


-227 


3140 


- 36 


38790 



TRUCOS DEL 



PROGRAMADOR 




CLAVE DE RUN 

Si no quieres que nadie ejecute tus 
programas sin tu permiso, teclea: 
POKE 32768,1 
A continuación introduce tu progra- 
ma, por ejemplo: 

10FOR k-1 to100 

30 NEX? ^ 

Al escribir RUN para la ejecución del 
mismo, te quedarás asombrado, pues te 
aparecerá en pantalla: 

Sintax error 

Si quieres conseguir la ejecución, te- 
clea* 

PÓKE 32768,0 

Ahora, al teclear RUN el programa 
será ejecutado normalmente. 

Lorenzo Martínez Rubio 



SONIDO CON EL PPI 

Utilizando el puerto de sonido de 1 bit 
(responsable del chasquido de las te- 
clas), podemos crear sonidos como 



10FCRI= 1 to150step2 
20 ForA=1 to150-l:Next 
30 out 171,14: out 171,15: next 

PATRONES DE 
CARACTERES 

Sabiendo que la definición de los 
patrones de los caracteres empieza 
en la dirección & H 1 BBF de la ROM 
podemos ver como están formados 
dichos caracteres: 

10 screen 1: keyoff : inpuf'Carác- 
ter:"; n$ 

20 n=asc(n$): if n< 32 thengosub 
70 

30 i = 7103 + n*8:?:fora = 1to¡+7 
40 a$ = bin$ (peek (a)) 

34 



50 ? right$ ("00000000" + a$,8); val 

(&B" + a$) 
60 next:end 

70 Inpuf'Código ascii del gráfico:"; 
n: retum 

COLOR DE FONDO EN 
SCREEN 1 

Con este programa cambiamos el co- 
lor de fondo de los caracteres: 

10 Screen 1: Input" Color 

(1-15):";l 

20 Vpoke8196,i 

Juan A. VALERO ARIZA 



OPTIMIZACION 
INVERSION DE 
CARACTERES 

Les envío una posible optimización 
del programa de inversión de caracteres 
publicado en el n.° 15 de MSX EXTRA 
en la sección de trucos del programa- 
dor. 




La idea consiste en calcular el com- 
plemento a uno de los 8 bytes de la tabla 
de atributos. De esta manera el tiempo 
de ejecución en invertir todos los carac- 
teres es de 19 segundos aproximada- 
mente y se consigue sólo borrando las 
líneas 110 a 180 y cambiando la 190 
por: 

190 VPOKE 1,255- VPEEK (I) 
Si queremos rebajar más el tiempo de 
ejecución, puede pensarse en que para 
efectuar la inversión de todos los carac- 
teres sólo hay que cambiar el color de 
frente por el de fondo en la tabla de colo- 
res, esto es intercambiar el primer cuar- 
teto por el segundo en cada byte. 

Invirtiendo en complemento a uno el 
espacio y el cursor y modificando la ta- 
bla de colores obtendremos la inversión 
de todos los caracteres. De esta forma 
se consigue rebajar el tiempo en invertir- 
los todos en tan solo 0.6 segundos (30 * 
31 interrupciones del VDP) aproximada- 
mente. 

Una posible solución es: cambiar la lí- 
nea 70 por 

70 IF A$ = "TODOS" OR A$ = "todos" 
THEN 230 
y añadir las siguientes: 

230 YSP = 32*8: YCR =255*8 

240 FOR I = 0 TO 7 

250 VPOKE YSP + 1,255- VPEEK 

(YSP+I) 

260 VPOKE YCR + 1,255-VPEEK 

(YCR-fl) 

270 NEXT I 

280 FOR I =BASE (6) TO BASE (6) + 
31 

290 IZDA% = VPEEK (l)\16 : DCHA% 

= VPEEK (I) MOD 16 

300 VPOKE l,16*DCHA% + IZDA% 

310 NEXT I 

320 GOTO 210 

J. ATSERIA 



TABLA DE CONVERSION «SPECTRA» EN MSX 


TABLA DE CONVERSION ENTRE EL EXTENDED BASIC 1.0 (EL DEL MSX) Y EL 
EXTENDED BASIC 1.1 EL DEL SPECTRAVIDE0 318-328 Jorge CAL VET 


MSX 


SVI 31 8-328 


FUNCION 


KeyOFF 
KeyON 


SCREEN,, O 
SCREEN,, 1 


Hace 

desaparecer 
los rótulos de 
las teclas de 
función del 
dlsplay 


SCREEN 2 


SCREEN 1 


Pantalla graf. 
alta resol. 


SCREEN 3 


SCREEN 2 


Pantalla graf. 
multicolor 


OPEN"GRP"ASN 


NO NECESARIA 


Permite 
escribir texto 
en pantalla 
gráfica. 


PSET(X,Y):PRINT«... 
DRAW"BMX,Y":PRINT"... 


LOCATE X, Y: PRINT".. 


Posiciona 
texto en 
pantalla 
gráfica. 




PRESENTA 




M S X 



El soberano Jeque Abdul Al Kohol tiene una fabulosa flota 

de coches escondida en su palacio y su mecánico, Mick, 
se los quiere robar por que le paga con vuks, ojos de oveja. 
Para MSXde 64K. 



é 



9. 



I, 




Booga Boo salta a través de la exótica vetegación de 

f>rofundas cavernas en dirección a una salida escondida en 
a parte superior. También elude al terrible dragón volante 
que ataca en cuanto aparece. Para MSX de más de 32K. 



DISPONIBLE EN LOS MEJORES ESTABLECIMIENTOS DE SOFTWARE 

P.V.P. 2.495 
SI NO LO ENCUENTRAS DIRIGETE A 



Mariano Cubi. 4 Entio. Tel. 218 34 00 - 08006 Barcelona 



EL UNICO JUEGO DE FUTBOL 
CON TODOS 



lOonaml 





rCMM 


COLOR 




1 


I- 


? - á k * ' 






SKILL 


ItVtl. 1 ? 


3 4 9 




HM V 


TIME 3 


S ÍO 




ENIFB VOUR 1 1 OH MAHF* 

1 1«> EnoLts ero siow!, 


J 



PON EL NOMBRE 
DE TU CLUB 
FAVORITO. 




LOS COLORES DEL 
UNIFORME DE TU 
EQUIPO LOS 
PUEDES ELEGIR A 
TU ANTOJO. 



RECORTA Y ENVIA ESTE CUPON A: 4* SERMA 

C/. BRAVO MURILLO, N.° 377. 28020 MADRID TELS.: 733 73 1 1 



733 74 64 



TITULO 


PRECIO 


CANTIDAD 


NOMRRF Y APFI 1 IDOS- 


KONAMI FUTBOL 


4800 






niRFcnnN- 




POBLACION: 






PROVINCIA- 


CODIGO POSTAL:. 




FORMA DE PAGO: ENVIO TALON BANCARIO □ CONTRA REEMBOLSO □ 



LOS CARTUCHOS DE iGonami. SON COMPATIBLES EN TODOS 
LOS ORDENADORES MSX DE LAS MARCAS: 

Sony, Toshiba, Cannon, Mitsubishi, Dynadata, Yashica, Sanyo 

National Panasonic, Philips. 



